VBA-Worksheets().Rows().Select
25.05.2005 10:30:51
Alexander
Das ist meine Code:
Public Deckblatt As Worksheet
Sub AddRowBySelection()
Set Deckblatt = ThisWorkbook.Worksheets("Deckblatt AUD")
Deckblatt.Unprotect
Deckblatt.Rows(20).Select
Selection.Insert (xlShiftDown)
Deckblatt.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
Beim Ausführen kommt bei der Zeile "Deckblatt.Rows(20).Select" folgender Fehler:
Laufzeitfehler '1004':
Die Select-Methode des Range-Objektes konnte nicht ausgeführt werden.
Weiß jemand Rat?
Danke im Voraus.
Gruß, Alex.