Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Combobox1

Combobox1
22.10.2007 11:19:22
Holly
Hallo zusammen,
ich möchte in meiner Combobox1 als vorgabe den Namen von Tabell1 "A1" dann soll der rest wie folgt eingelesen werden
With ComboBox1
'.clear
iMax = ActiveSheet.UsedRange.Rows.Count
i = 2
For i = 2 To 500
.AddItem Worksheets("Pers. Daten").Cells(i, 1)
Next i
End With
anstelle von clear brauche ich den befehl das der erste Wert aus Tabell1 A1 steht.
Danke schon mal
Holly

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Combobox1
22.10.2007 11:39:06
Chaos
servus,
so:

Private Sub UserForm_Initialize()
With ComboBox1
.Clear
.AddItem Sheets("Tabelle1").Range("A1")
Dim i As Integer
For i = 1 To 7
.AddItem Sheets("Pers. Daten").Cells(i, 1)
Next
End With
End Sub


Gruß
Chaos

Anzeige
AW: Combobox1
22.10.2007 11:58:50
Holly
Danke Chaos,
Kann ich die Combobox auch mit den Wert aus Tabelle1 so füllen das man ihn sofort lesen kann wenn man die Userform öffnet.
vielen Dank
Chaos
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige