Laufzeitfehler 1004 Tabelle aktivieren
06.11.2003 10:56:55
Dominik
Dieses Problem wurmt mich jetzt schon seit einer Woche, weiß der Kuckuck wo der Wurm dirn ist!
Ich will doch nur ein Makro schreiben, dass mir aus meiner Tabelle2 die sich "Nicht löschen!" einen Bereich löscht. Sonst will ich gar nichts.
Das Problem ist dass er immer wieder schreibt:
"Laufzeitfehler 1004"
"Die Select-Methode des Range-Objektes ist fehlerhaft"
Ich habe keinen blasen Schimmer wieso, vor allem hat genaudasselbe Makro an anderer Stelle schon funktioniert.
hier das makro
_______________________________________________________________
Public
Sub zuruBut_CLICK()
Dim i As Variant, b As Range
'wir lassen den Monitor erst nach dem Prozess aktualisieren
Application.ScreenUpdating = False
'Blattschutz aus
Cells.Select
ActiveSheet.Unprotect
'Zellen löschen und farblos machen
Range("B6:FB16").Select
Selection.ClearContents
ActiveWindow.ScrollColumn = 2
Rows("19:519").Select
Selection.ClearContents
Selection.Interior.ColorIndex = xlNone
Selection.NumberFormat = "General"
Selection.Font.Bold = False
ActiveWindow.ScrollRow = 5
Sheets("Nicht löschen!").Range("A1").Select
Selection.ClearContents
Sheets("Monatsübersicht").Activate
'Blattschutz ein
ActiveSheet.Protect
'Monitorupdaten
Application.ScreenUpdating = True
End Sub
_________________________________________________________________________
Auch Dinge wie:
sheets("Nicht löschen!").select
Rows("1:2").select
oder Range("A1:B54").select
oder columns("A:B").select
funktionieren alle nicht immer wieder der gleiche Fehler!
Vielen Dank schonmal!