Office: (Office 2010) VBA In Listbox bestimmten Eintrag ändern

Guten Tag,

ich möchte wenn ich auf den Button "Soldaten anlegen/ändern" Klicke in der zweiten Ansicht "Soldaten Suchen", wenn ich z.B. nach dem Namen Müller Suche, die Daten ändern können. Soweit Funktioniert das auch, aber sobald ein Name doppelt vorkommt, ändert er nicht den richtigen. Wie bekomme ich das hin? Kann mir da wer helfen?

Zur Veranschaulichung habe ich euch eine Testdatei hochgeladen.

Beispiel:

Ich suche nach dem Namen Müller

Selectiere dort den David Müller und möchte diese Daten "in der Tabelle Soldaten hinterlegt" Rechts neben der Listbox angezeigt bekommen.

Wenn ich dann auf Speichern drücke, soll er den richtigen (also David) ändern.

Hoffe mir kann wer helfen.

Danke für eure Hilfe!

:)

 

Moin,

Du musst bei der Prüfung des Selectierten Wertes der Listbox mit der Tabelle Nicht nur "Müller" also den "erstspalteneintrag" prüfen sondern auch den "zweitspalteneintrag"

also sinngemäß
Code:

..

Warum?
Weil deine Schleife nur nach dem ersten Müller sucht. Und nicht nach dem Müller David.

Alterantiv kannst du mit einer ID arbeiten. Dann musst du aber grundlegend die Struktur ändern.


Grüße

 

Hi,

der einfachste Weg: benutze eine zusätzliche Spalte für die ListBox, in die du beim Füllen der ListBox die relevante Zeile ainträgst - also rngcellPLZ.Row. Dann kannst du diesen Eintrag bei der Übergabe der geänderten Daten verwenden.
Die Spaltenbreite kannst du auf 0 setzen, sodass die Spalte nicht zu sehen ist.

 

Das hatte ich mir schon gedacht. Klingt einfach, nur schaffe ich das nicht zu ändern. Kannst du mir einenanhalt geben? Ich habe nicht wirklich Ahnung von VBA und wie du bestimmt gesehen hast, mir selber alles zusammengesucht und probiert. (dementsprechend sieht der Code auch wüst aus)

 

Danke Beverly, das werde ich mal ausprobieren.

 

Hi, ich nehme mal an, Du bist auch Timo....*Smilie

wenn Du auf Deinen Suche starten - Button klickst, erstellst Du eine 3-spaltige Listbox, deren 3. Spalte die gefundene Adresse aufnimmt. Das ignorierst Du im Click Ereignis der Listbox vollkommen. Dort lässt Du nach Müller in Spalte 1 suchen.
Die Schleife darin ist zudem überflüssig. Ändere den Code des Click-Ereignisses mal so ab:
Code:

...noch ein kleiner Hinweis. Textbox1 bis 128 sind nicht wirklich Namen, die sich einem auf den 1. Blick erschließen. Man kann die Name Eigenschaften der Objekte auch ändern. txtVorname wäre eine Möglichkeit für eine Textbox, die den Vornamen aufnehmen soll....

 

Ich schaffe beides nicht.... egal was ich mache. Bei R J bekomme ich nur "Neuer Eintrag Zeile X" angezeigt. Bei Beverly, weiß ich nicht wie ich das anstellen kann.

 

Deiner ListBox weist du doch bereits die Adresse zu (hatte ich nicht gesehen), dann kannst du daraus auch die Zeile ableiten, um die Daten aus der Tabelle zu holen. Anschließend musst du dich nur noch auf diese Zeile beziehen:

Code:

und auch beim Speichern kannst du das so lösen:

Code:

 

Das war natürlich sehr dumm von mir! Danke Beverly.

 

Code:

Wie kann ich da noch eine zweite Spalte einfügen? Also Name und Vorname?

Beverly, ich kann dich leider nicht bewerten. Ich habe dich als letztes bewertet und deshalb geht das nicht.

 

Hi,

stelle für die ListBox1 die Eigenschaft ColumnCount auf 2, dann musst du den Code nur um die folgende Zeile ergänzen:

Code:

 

Kann ich die jetzt auch wieder so ansprechen wie die zweite Listbox? Das ich bei doppelten, die richtigen angezeigt bekomme?

 

Dann musst du die ListBox mit 3 Spalten versehen und die Zelladresse in die 3. Spalte schreiben - so wie bei ListBox2

 

Ich finde meinen Fehler nicht. Könntest du mal drüber gucken?

 

Welchen Fehler und wo?