Laufzeitfehler
01.03.2016 17:39:35
mike49
habe eine Mappe mit Monatsblättern Jan, feb, Mär usw. bis Dez.
Beim Öffnen der Mappe wird das aktuelle Monatsblatt (Mär) geöffnet und die Zelle zur Eingabe des Arbeitsbeginns mit diesem Makro aktiviert:
Private Sub Workbook_Open()
With ThisWorkbook.Sheets(Format(Date, "MMM"))
.Activate
.Cells(Day(Date) + 8, 5).Select
End With
End Sub
Gleichzeitig kommt eine Meldung:
Laufzeitfehler '9':
Index außerhalb des gültigen Bereichs.
Klicke ich auf Debuggen, kommt die Meldung:
"Code kann im Haltemodus nicht ausgeführt werden" und im Makro ist die Zeile
. . .With ThisWorkbook.Sheets(Format(Date, "MMM")). . .
gelb unterlegt.Ich kann nur mit ok bestätigen und das Debuggen beenden
Was läuft da schief?
Gruß
mike49