sorteren in verborgen tabblad

[popipipo]

Ik heb een eenvoudige macro die een kolom in een ander tabblad sorteert.
Als ik echter het tabblad verberg (hidden of very hidden) werkt de macro niet meer.

Ik heb er al voor/na Sheets("Sheet1").Visible = True/Sheets("Sheet1").Visible = False gezet maar het werkt nog niet.
Het zal wel heel simpel wezen maar ik kom er even niet uit.

Sub sorteer()
 Sheets("Sheet1").Visible = True
   Sheets("Sheet2").Select
        Range("A1", Range("A1").End(xlDown)).Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo
    Sheets("Sheet1").Select
Sheets("Sheet1").Visible = False
End Sub

 

[edmoor]

Je zet Sheet1 op Visible en sorteert dan op Sheet2?

Krijg je een foutmelding?
Zoja, welke dan?
Heb je een voorbeeld documentje?

 

[VenA]

Het heeft weinig nut om iets met Sheets("Sheet1") te doen als je de gegevens in Sheets("Sheet2") wil sorteren.

 

[popipipo]

Ik zei al het zal wel iets simpels wezen. Sheet1 en Sheet2 gewoon over het hoofd gezien.

 

[VenA]

Moet ze je ook maar gewoon Blad1 en Blad2 noemen.:d

 

[snb]

Sub M_snb()
 with Sheet1
   .cells(1).currentregion.sort .cells(1),,,,,,,0
  end with
End Sub