Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
26.04.2024 15:27:20
Excel öffnet nach Auswahl einer Excel diese leer
26.04.2024 12:46:38
Nutzereingaben Speichern und Laden
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1388to1392
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1388to1392
1388to1392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Combo Box VBA

Combo Box VBA
04.11.2014 07:07:19
Marc
Hello,
please see attached uploaded file.
I try to chose some Input data from the Combo box and list those under each other. So first I chose A and click on the Add button. This should go to D1. After that I chose B and it should go under D2. And so on....
Thanks for help!!
Marc
https://www.herber.de/bbs/user/93527.xlsx

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Combo Box VBA
04.11.2014 09:30:24
Rudi
Hallo, 
Private Sub CommandButton1_Click()
Dim lRow As Long
lRow = Cells(Rows.Count, 4).End(xlUp).Row
If lRow > 1 Then lRow = lRow + 1
Cells(lRow, 4) = ComboBox1
End Sub
Gruß
Rudi

AW: Combo Box VBA
04.11.2014 16:35:38
Marc
Hi Rudi,
thanks a lot. Right now it always replace D1 when I chose a new item from the list. Is it possible that it will add up to the cells D2, D3 etc. ? So I can create another list out of my original list.
Thanks
Marc

AW: Combo Box VBA
05.11.2014 19:12:14
Uduuh
Hello,
sorry for the mistake. 
Private Sub CommandButton1_Click()
Dim lRow As Long
lRow = Cells(Rows.Count, 4).End(xlUp).Row
If Cells(lRow, 4)  "" Then lRow = lRow + 1
Cells(lRow, 4) = ComboBox1
End Sub
Gruß
Rudi
Anzeige

Links zu Excel-Dialogen

ComboBox CommandButton

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige