Worksheets("Tab1").Range("A1") - Problem?
05.05.2004 18:20:07
thomas
mein Excel hat irgend ein Problem mit
Worksheets("Tab1").Range("A1").Select, das ich in einem unspektakulären Makro habe das wie folgt aussieht:
Sub Makro33()
Application.ScreenUpdating = False
Sheets("Tab1").Range("C50:FN50").Copy
Sheets("Tab1").Range("C124").PasteSpecial Paste:=xlPasteValues
Sheets("Tab1").Range("B48:AA72").Copy
Sheets("Tab1").Range("B122").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
With Worksheets("Erfolgssens.-Analyse BSW")
.Rows("8:239").Hidden = False
.Rows("38:110").Hidden = True
.Rows("150:209").Hidden = True
End With
Worksheets("Tab1").Range("A1").Select '--->hier gibts immer den Fehler
End Sub
in der Zeile vor End
Sub gibts immer einen Fehler raus "die Select Methode des Objekts konnte nicht ausgeführt werden". Ich möchte eigentlich mit dieser letzten Zeile nur, das nach ausführen des Makros A1 aktiv ist. Weiss jemand, wie ich das realisieren kann ohne dass Excel rebelliert?
Beste Grüsse
thomas