EXCEL 2016 VBA - Change Ereignis

Soll ich hier mit einer if Anweisung arbeiten? Aber dann fehlt sicher das "Then" und die Bedingungen, dient das nur als Idee deinerseits?

--------------------------------------------------------------------------------------

Nee, IIF gibt es in VBA wirklich.

Wie auch immer, das Problem liegt vermutlich an einer ganz anderen Stelle... lad die Datei mal auf einen Online File Hoster wie www.dropbox.com und poste den Download-Link hier, dann kuck ich mal.

Andreas.

Wo sollen wir da anfangen... also Du hast da ein Verständnis-Problem, die Dinger funktionieren anders als Du denkst.

Generell: "Formular abbricht"... hast Du es vorher irgendwo festgetackert und nun fällt es von der Wand? >

Es kommt ganz offensichtlich zu einem RTE (Run Time Error = Laufzeitfehler) und der hat auch eine Nummer und eine Beschreibung, damit kann ich was anfangen und ggf. Rückschlüsse auf die Ursache ziehen. Aussagen ala "funktioniert nicht" sind nutzlos.

Dann solltest Du den Debugger benutzen und einen Breakpoint in Deine Change-Ereignisroutine legen, dann kannst Du die Zeile ermitteln. Weiterhin ist diese Einstellung (Extras\Optionen) dabei hilfreich, weil eine Userform (Um die es hier geht, doer auch nicht?)
ein Klassenmodul ist:





In einem Change-Ereignis ein SetFocus des gleichen Controls aufzurufen ist unnutz, weil das Control schon den Focus hat. Außerdem löst dieser Aufruf auch wieder ein Ereignis aus, welches zur Folge haben kann das weitere Ereignisse ausgelöst werden...

Die ListIndex-Eigenschaft einer ComboBox hat per Default -1 = kein Eintrag, ansonsten eine Nummer von 0 bis Count-1

Private Sub cboGesehen_Change()

'Wenn der Name in Gesehen geändert wird, wird automatisch die Abteilung angepasst.

With Me.cboGesehen

Me.cboAbteilung4.Value = IIf(.ListIndex < 0, "", .List(a, 1))

End With

End Sub

Bedenke das auch dieses wieder das Change-Ereignis des Me.cboAbteilung4 auslöst.

Ich mutmaße mal das "cboAbteilung4" auch eine ComboBox ist... je nachdem welche Einstellungen die hat kann das natürlich zur Folge haben das Du einen weiteren RTE bekommst... (wenn der Eintrag nicht vorhanden ist).

Aber was macht das ganze für einen Sinn????? Du hast eine ComboBox mit "xxx" und dann schreibst Du das "xxx" in eine 2te Combobox... wozu soll das gut sein?

Andreas.

Hi Andreas,

danke für deine Antwort.

ja da liegt sicher ein Verständnisproblem vor. Ich bin kein ausgebildeter Informatiker / Programmierer und versuche das selbst zu lernen, mit Hilfe von Videos, Anleitungen oder auch dem Communityforum.

Es geht auch um eine Userform:





Ich bekomme einen Laufzeitfehler:





Die Aufgabe ist nicht den selben Eintrag von der einen in die nächste Combobox zu schieben.

cboGesehen greift für die Dropdown-Auswahl auf eine Tabelle zu. In der zweiten Spalte dieser Tabelle sind die Abteilungen eingetragen für die entsprechenden Namen aus der ersten Spalte.





Wenn der Name der Person in cboGesehen eingetragen wird, soll in die cboAbteilung4 gleich die richtige Abteilung der Person ergänzt werden.

Genau das funktioniert auch, solange ich die Auswahl über das Dropdown-Menü treffe, oder gleich den richtigen Namen eintippe.

Wenn ich nun den bereits eingetragenen Namen wieder löschen möchte, weil doch nicht Mustermann sondern Musterfrau in cboGesehen eingetragen werden muss, wird durch das Löschen des Namens der RTE ausgelöst.

Den Code von dir verstehe ich leider nicht, insbesondere die Zeile:

Me.cboAbteilung4.Value = IIf(.ListIndex < 0, "", .List(a, 1))

Soll ich hier mit einer if Anweisung arbeiten? Aber dann fehlt sicher das "Then" und die Bedingungen, dient das nur als Idee deinerseits?

Danke und schönen Gruß

Hainer

Besten Dank für deine Antwort, irgendein Trick um den selben Effekt zu erzielen fehlt dir nicht zufällig ein?

Das geht alles nur mit VBA.

Wenn Deine Zelle einen Wert enthält, dann kannst Du diese Zelle mit dem Change Ereignis überwachen.

Enthält Sie jedoch eine Formel, dann musst Du das Calculate Ereignis benutzen, welches jedoch Dir keine Auskunft gibt welche Zelle berechnet wurde.

Bei den Steuerelementen wäre ein Kontrollkästchen eine schlechte Wahl, weil es keine Ereignisse unterstützt.

Eine Checkbox hat z.B. ein Click-Ereignis, in dem kannst Du dann machen was Du willst.

Reichlich Aufwand nur für einen eye-catcher.

Andreas.

Danke!

Worksheet_Change-Ereignis per VBA sagt mir jetzt aber gar nichts.

Was ist das und was müsste ich da genau machen?

Ich finde via google leider nur Problembesprechungen in dem Zusammenhang:

https://www.google.ch/?gws_rd=ssl#q=Worksheet_Change-Ereignis+excel+2010