Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema ListBox
BildScreenshot zu ListBox ListBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Listbox macht Probleme


Betrifft: Listbox macht Probleme von: Steffen A
Geschrieben am: 27.01.2019 14:36:20

Hallo zusammen

in meiner Userform sind 2 TextBoxen die gefüllt werden mit einer ListBox.
In TextBox 2 steht ein Betrag drin denn ich per Hand oder durch den CommandButton6 (Einzeln Löschen) löschen kann.
Wenn ich was lösche, kommt auch eine MsgBox "Sie haben den Betrag gelöscht!"
MsgBox "Bitte geben Sie ein Betrag ein!". Das funktioniert auch prima.

Aber wenn ich in der Listbox die Einträge wechsle, kommt auf einmal die MsgBox "Sie haben den Betrag gelöscht!".
MsgBox " Bitte geben Sie ein Betrag ein! ".

Hier ist mein Beispiel Datei: https://www.herber.de/bbs/user/127180.xlsm

Wie kann man das ändern?
Kann jemand helfen?

Gruß Steffen

  

Betrifft: AW: Listbox macht Probleme von: onur
Geschrieben am: 27.01.2019 15:27:34

Klar, in Listbox_Change änderst du den Wert von Textbox1 und rufst dadurch Textbox1_Change auf.
Benutze statt Textbox1_Change besser Textbox1_Exit.


  

Betrifft: AW: Listbox macht Probleme von: onur
Geschrieben am: 27.01.2019 15:28:37

Meinte natürlich in "Listbox_Click".


  

Betrifft: AW: Listbox macht Probleme von: Steffen A
Geschrieben am: 27.01.2019 15:43:17

Hallo onur

Danke für die schnelle Hilfe.

Gruß steffen


  

Betrifft: AW: Listbox macht Probleme von: Werner
Geschrieben am: 27.01.2019 15:31:52

Hallo Steffen,

hier deine Datei.

https://www.herber.de/bbs/user/127181.xlsm

Gruß Werner


  

Betrifft: AW: Listbox macht Probleme von: Steffen A
Geschrieben am: 27.01.2019 15:41:55

Hallo Werner

Danke für die schnelle Hilfe. Funktioniert prima.

Gruß Steffen


  

Betrifft: Gerne u. Danke für die Rückmeldung. o.w.T. von: Werner
Geschrieben am: 27.01.2019 17:41:27




  

Betrifft: weiterer Fehler ... von: Matthias L
Geschrieben am: 27.01.2019 18:10:15

Hallo

Wenn im UserForm der Titel geändert wird und man Speichern wählt,
wird einfach der Betrag gelöscht (ohne Zutun des Benutzers). Ganz schlecht!

Was auch noch auffällt:

Spielzeit in min (Überschrift)
dann aber in der Liste €-Währung

und ich würde es total anders programmieren.

Wenn man schon mit Listbox arbeitet, hat man ja den Listindex des Datensatzes
und kann somit ohne Aufwand Textbox1 und Textbox2 direkt ansprechen (ohne Schleife).

Gruß Matthias


  

Betrifft: AW: weiterer Fehler ... von: Steffen A
Geschrieben am: 27.01.2019 20:41:11

Hallo Matthias L

Wie kann man es besser machen? Für Vorschläge bin ich immer offen.

Gruß Steffen


  

Betrifft: ganz kurz dazu ... von: Matthias L
Geschrieben am: 27.01.2019 20:58:44

Hallo

z.B.

Private Sub ListBox1_Click()
 TextBox1.ControlSource = ActiveSheet.Name & "!" & Cells(ListBox1.ListIndex + 2, 1).Address
 TextBox2.ControlSource = ActiveSheet.Name & "!" & Cells(ListBox1.ListIndex + 2, 2).Address
End Sub
reicht vollkommen aus.

Wenn Du nun einen Eintrag der Textbox änderst, wird die so verlinkte Zelle mit geändert.

Gruß Matthias


  

Betrifft: hier die Datei dazu ... von: Matthias L
Geschrieben am: 27.01.2019 21:12:08

https://www.herber.de/bbs/user/127190.xlsm


  

Betrifft: AW: hier die Datei dazu ... von: Steffen A
Geschrieben am: 31.01.2019 19:25:43

Hallo Matthias

Sorry das ich mich jetzt erst melde.
Hatte in den letzten tagen viel zu tun, bin erst heute dazu gekommen deine Datei ausprobieren.
Klappt perfekt und ist einfacher danke.

Gruß Steffen


Beiträge aus dem Excel-Forum zum Thema "Listbox macht Probleme"