Re: Excel97 SR2 Absturz wenn VBA nicht geladen
01.08.2002 22:23:08
ulla
Hallo Charlie,vielen Dank für Deine Antwort. Mein File ca. 800kb groß, besteht aus mehreren Modulen und UserForms. Probleme gibt es bei einem UserForm, dass aus über 300 Items besteht. Wenn ich die .xls Datei starte, und via
Private Sub EingabePatientennummerOK_Click()
EingabePatientennummer.Hide
Call LeseListenFelderDefinitionen
[...]
Eingabemaske.Show
End Sub
die Funktion LeseListenFelderDefinitionen mit Inhalt:
Public Sub LeseListenFelderDefinitionen()
Dim i, j
Worksheets("Listenfelder").Activate
Eingabemaske.I030.Clear
[...]
End Sub
aufrufe (I030 ist eine nicht gebundene Combobox), stürzt Excel bei Eingabemaske.I030.Clear ab.
Ich habe zu Beginn mit
Load Eingabemaske
die Eingabemaske geladen. Ich habe auch schon versucht, den
Aufruf Eingabemaske.I030.Clear in den _Activate - Teil der Eingabemaske zu schreiben (d.h. ich benutze Eingabemaske.Show und die Clear Anweisung wird dann automatisch ausgeführt - leider alles ohne Erfolg.
Das ganze erscheint mir ziemlich verworren, ich kann Dir nur noch ein paar Beobachtungen mitteilen:
1) Wenn ich den VBA-Editor geöffnet hatte, und dann speichere, schließe, per Doppelklick öffne -> alles O.K.! Erst wenn ich jetzt nocheinmal speichere, OHNE den VBA-Editor geöffnet zu haben, geht´s beim nächsten Starten wieder schief!?!
2) Das Problem hängt nicht an der ComboBox I030. Wenn ich ein normales Listenfeld ändern möchte, passiert das Gleiche.
3) Das einzige Feld, das ich ohne Absturz editieren kann, ist I000_1, eine Textbox mit TabIndex 0. Sobald ich auf ein anderes Item zugreife (egal, ob .Value, .SetFocus, .Clear und auch egal, ob Eingabemaske sichtbar ist oder nicht) stürzt Excel ab.
4) Ich habe auch ein kleineres UserForm mit nur einer ComboBox. Dort kann ich problemlos .Clear etc. ausführen, unabhängig davon ob die Userform bereits angezeigt wurde oder nicht.
So, das ist wohl eher eine etwas langwierige Beschreibung, da mir leider nicht klar ist, in welcher Richtung die Lösung liegen könnte.
Gruß,
Ulla