Debug-Meldung bei Ersteingabe
31.01.2008 13:26:04
berni
Es ist zwar ein kleines Problem ohne schwerwiegende Auswirkungen, trotzdem möchte ich hinter das Geheimnis kommen.
Also folgende Ausgangslage: Ich habe seinerzeit (vor einigen Jahren) in der alten Excel-Version 2003 meinen Mädels (Sekretärinnen) ein kleines Makro für ihr Postbuch geschrieben. Das hat zm Inhalt, dass in der Nebenzelle in der Spalte B automatisch das aktuelle Datum eingefügt wird, wenn in der Zelle der Spalte A das Kürzel der Sekretärin eingegeben wird.
Das Makro sieht so aus:
Private Sub Worksheet_Change(ByVal target As Range)
Dim Loletzte As Long
Loletzte = IIf(IsEmpty(Worksheets("Tabelle3").Range("A65536")), _
Worksheets("Tabelle3").Range("A65536").End(xlUp).Row, 65536)
If Worksheets("Tabelle3").Cells(Loletzte, 1) "" Then
Worksheets("Tabelle3").Cells(Loletzte, 2) = Date
Else
Worksheets("Tabelle3").Cells(Loletzte, 2) = ""
End If
End Sub
Das hat bis jetzt ganz gut funktioniert. In der Zwischenzeit haben wir aber auf Excel 2007 umgerüstet. Seit diesem Moment bekommen sie bei der Ersteingabe immer das Debug-Fenster. Wenn dieses beendet wird, ohne das Makro zu verändern, funktioniert das Makro trotzdem - bis zum Neueinstieg in das Excel-File. Könnte das damit zusammenhängen, dass ich Loletzte mit A65536 begrenzt habe?
Vielleicht hat jemand von Euch eine Idee.
Mittlerweilen
schöne Grüße
Berni