Laufzeitfehler 1004
21.03.2006 19:15:45
Peter
ich habe folgendes Problem:
Private Sub Worksheet_Deactivate()
Sheets("Abzweigtabelle").Select
Range("B4:I54").Select
Selection.Sort Key1:=Range("B4"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
Wenn ich den Sheet wechsle läuft das Programm ganz normal ab, bis zu dieser Stelle:
Range("B4:I54").Select.
Dann erhalte ich die Fehlermeldung: Laufzeitfehler '1004' (Die Select - Methode des Range - Objekts konnte nicht ausgeführt werden).
Wenn ich das ganze als "normales" Makro einer Schaltfläche hinterlege dann bekomme ich diesen Fehler nicht !!!
Ich wäre sehr dankbar wenn mit jemand helfen könnte.
Vielen Dank!
LG Peter