Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
392to396
392to396
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellen nicht in DropDownFeld einfügen,wenn 0/leer

Zellen nicht in DropDownFeld einfügen,wenn 0/leer
08.03.2004 09:56:11
Eva
Guten Tag,
wie komplettiere ich unten folgenden vba_code, um Zellen mit 0 oder "leer" nicht im Drop Down Feld wiederfinden zu müssen?

Private Sub ComboBox1_Change()
End Sub


Private Sub CommandButton1_Click()
s = 3
z = 5
Do Until ActiveWorkbook.Worksheets("Intranet").Cells(z, 3) = "ENDE"
ComboBox1.AddItem (ActiveWorkbook.Worksheets("Intranet").Cells(z, 3))
z = z + 1
Loop
End Sub

Mit Dank, Eva

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

Betreff
Datum
Anwender
Anzeige
AW: Zellen nicht in DropDownFeld einfügen,wenn 0/leer
08.03.2004 10:11:02
Nayus
Hi,

Private Sub CommandButton1_Click()
s = 3
z = 5
Do Until ActiveWorkbook.Worksheets("Intranet").Cells(z, 3) = "ENDE"
If Not isnull(Cells(z, 3)) And len(cstr(Cells(z, 3))) > 0 then
ComboBox1.AddItem (ActiveWorkbook.Worksheets("Intranet").Cells(z, 3))
end if
z = z + 1
Loop
End Sub

Viel Erfolg,
Nayus
AW: Zellen nicht in DropDownFeld einfügen,wenn 0/leer
08.03.2004 11:10:02
Eva
Hallo
der von Ihnen beschriebenen Zusatzcode passt nicht ganz. Es werden nicht alle Werte in das DropDown Feld gezogen. Könnte es an mitunter aufeinander folgenden "leeren Zellen" liegen?
Gruß, Eva
Anzeige

406 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige