Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1412to1416
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
Inhaltsverzeichnis

Combobox

Combobox
12.03.2015 12:31:49
Mathias

'Hi Leute,
ich brauche Hilfe.
ich bin noch schwer am Anfang was VBA angeht nun will ich aber eine Datei bauen die mir die Arbeit erleichtert.
ich habe ein Userform gebaut und will nun das die Combobox die dort ist mit den Daten aus Tabelle 2 gefüllt wird.
in A9 steht etwas und in A20 und in A30
ich will es gerne erweitern können ohne im Programm was neu Programmieren zu müssen.
außerdem will ich das er die leeren Zeilen wie zum Beispiel A8 nicht anzeigt werden.
habe diesen Programmtext bisher das die Userform aufgerufen wird habe ich schon hinbekommen
Private Sub UserForm_Activate()
TextBox1 = Application.UserName
TextBox2 = Time
TextBox3 = Date
Combobox = ?
bitte helft mir bin am verzweifeln habe mir schon ein buch bestellt welches mir helfen soll. =(
schnelle antworten begrüße ich sehr :D

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Recherche-Combobox füllen- suchen... oT
12.03.2015 12:46:10
Helmut

AW: Combobox
12.03.2015 12:52:22
Rudi
Hallo,
eine Möglichkeit:
Private Sub UserForm_Activate()
Dim i as Long
TextBox1 = Application.UserName
TextBox2 = Time
TextBox3 = Date
with Sheets("Tabelle2")
for i=2 to .cells(.rows.count,1).end(xlup).row
if .cells(i,1)"" then Combobox1.additem .cells(i,1)
next i
end with
End Sub
Gruß
Rudi
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige