Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema ListBox
BildScreenshot zu ListBox ListBox-Seite mit Beispielarbeitsmappe aufrufen

Listbox-Auswahl in eine Zelle schreiben | Herbers Excel-Forum


Betrifft: Listbox-Auswahl in eine Zelle schreiben von: Tim
Geschrieben am: 30.07.2012 17:18:40

Hallo,

ich habe eine UserForm mit einer ListBox.

Kann mir jemand sagen, was ich tun muss, damit bei Auswahl eines Eintrags der entsprechende Begriff in immer die gleiche Zelle (Blatt2, K120) geschrieben wird.

Wird ein anderer Wert in der Liste ausgewählt, soll der aktuelle Eintrag in K120 überschrieben.
Wird der erste Eintrag in der Liste ausgewählt, soll "" in K120 geschrieben werden.

VG und vielen Dank im Voraus für jeden Tipp,
Tim

  

Betrifft: AW: Listbox-Auswahl in eine Zelle schreiben von: Matthias L
Geschrieben am: 30.07.2012 17:42:44

Hallo Tim

Private Sub ListBox1_Click()
 Tabelle2.Range("K120") = Me.ListBox1.Value
End Sub
Gruß Matthias


  

Betrifft: AW: Listbox-Auswahl in eine Zelle schreiben von: Tim
Geschrieben am: 30.07.2012 17:45:22

Hallo Matthias,

vielen Dank für die schnelle Hilfe - und so einfach ! :-)
Klappt bestens.

VG und einen schönen Nachmittag,
Tim


  

Betrifft: achso wg. 1.Eintrag = leer---> dann so ... von: Matthias L
Geschrieben am: 30.07.2012 17:53:26

Hallo Tim

Private Sub ListBox1_Click()
If ListBox1.ListIndex = 0 Then
 Tabelle2.Range("K120").ClearContents
Else
 Tabelle2.Range("K120") = Me.ListBox1.Value
End If
End Sub

Beachte bitte das ich mit dem CodeNamen der Tabelle arbeite (Der RegisterblattName ist unwichtig!)
Willst Du immer das es im 2.Tabellenblatt lt. Index eingetragen werden soll
musst Du statt Tabelle2 einfach Sheets(2) ... benutzen.
Das ist dann das 2.Blatt von links.
Das muss natürlich auch existieren, sonst müsste noch eine Fehlerbehandlung rein.

Nur Interessehalber:
Warum willst Du eigentlich bei Auswahl des ersten Eintrages einen Leerstring in die Zelle schreiben ?

Gruß Matthias


  

Betrifft: AW: achso wg. 1.Eintrag = leer---> dann so ... von: Tim
Geschrieben am: 30.07.2012 17:58:03

Spitze - vielen Dank auch dafür, Matthias !
Auch das klappt bestens. :-)

VG,
Tim


Beiträge aus den Excel-Beispielen zum Thema "Listbox-Auswahl in eine Zelle schreiben"