Hallo,
beim Code sind mir keine Besonderheiten augefallen.
Ich gehe mal davon aus, dass es sich bei der auskommentierten Zeile ...
' End If
... um ein Übertragungsfehler handelt. Erst nachdem Aktivieren dieser Zeile wird der Code als solches dem Interpreter als gültig angenommen.
Wenn es sich beim Objekt WksVrmtr um eine Tabelle handelt, werden alle Werte in diese übertragen.
Beim Objekt Lst_Vrmt handelt es sich um eine Listbox?
Eine direkte Verknüpfung von der Tabelle zu den Eingabefeldern könnte auch helfen. Hier werden allerdings die Werte unmittelbar nach dem Ändern in den Eingabefeldern in die Tabelle übernommen und nicht erst beim Anklicken des Buttons cmd_VSave.
Ich würde eher prpfen, ob in der Arbeitsmappe irgend welche weiteren Automatische Events vorhanden sein könnten, die beim Übertragen der Werte in die Tabelle aufgerufen werden.
Wenn alles nichts mehr weiter hilft, kann man auch eine neue Arbeitsmappe erstellen und alle Tabellen ohne Events übertragen. Zum Schluß nur die Userform mit allen etwaigen Abhängigen weiteren Befehlen übertragen. Erst danach könnte ein Testlauf aussagekrätig sein, ob es nun am Userform selbst liegt, oder an irgendwelche anderen Events.
LG, BigBen
P.S. nach dem Schreiben des Beitrags ist mir noch eine mögliche Lösung eingefallen:
Mit dem Befehl ...
Application.EnableEvents = False
... kann man auch jegliche etwaige Events in der Arbeitsmappe deaktivieren, ohne erst eine neue Arbeitsmappe erstellen zu müssen.
|