ich bin ratlos... ich hatte eine Formel in einer USERFORM, mit der ich die letzte Zeile auf einem anderen Tabellenblatt herausfand:
Dim LETZTEZEILE As Long
LETZTEZEILE = Worksheets("Index").Range("G5000").End(xlUp).Row
seit gestern abend komme "Laufzeitfehler 40036 - Anwendungs- oder objektdefinierter Fehler"
ich hab zwar einiges geändert an dieser Datei, aber dies sollte doch funktionieren... oder?
das Ziel ist, eine Listbox zu füllen... aber selbst wenn ich die Listbox ohne LETZTEZEILE schreib, kommt die Meldung...
vorher:
Me.FORMAUFTRAGSART.List = Worksheets("Index").Range("G2:G" & lngUntersterEintrag).Value
jetzt:
Me.FORMAUFTRAGSART.List = Worksheets("Index").Range("G2:G1000")
auch nun bringt er diesen Laufzeitfehler *grr*
bin während dem Schreiben noch am ausprobieren...
ich hatte auf der "INDEX" Seite diesen Befehl zum erstellen von mehreren Unterverzeichnissen
Declare Function MakePath Lib "imagehlp.dll" Alias "MakeSureDirectoryPathExists" (ByVal lpPath As String) As Long
wenn ich diesen Befehl in ein "Modul" schreib, dann kommt der "Laufzeitfehler 1004 - Anwendungs- oder objektdefinierter Fehler"
Ich blicks nicht mehr :-(
Gruß
Timo