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

Forumthread: Führende Null wird nicht in ListBox1 eingetragen

Führende Null wird nicht in ListBox1 eingetragen
Josef
Guten Morgen!
Mit folgendem VBA Text werden die Zahlen aus der Spalte P in der Tabelle 1 in die ListBox1 eingelesen. Bei Zahlen wo eine führende Null existiert, wird diese jedoch ohne diese Null eingetragen. Wie lautet bitte der Formatbefehl damit die Zahl richtig mit der führenden Null in die ListBox1 eingetragen wird?
Dim wks As Worksheet
Set wks3 = Workbooks("Masterprog.xla").Worksheets("Tabelle1")
Dim intCounter As Long
For intCounter = 1 To 9802
ComboBox15.AddItem wks3.Cells(intCounter, 16)
Next intCounter
'cboListe.ListIndex = 0
ComboBox15.ListIndex = 1
End With
Danke
Josef
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Führende Null wird nicht in ListBox1 eingetragen
10.08.2011 07:22:56
Oberschlumpf
Moin Josef
Versuch es mal so:
ComboBox15.AddItem Format(wks3.Cells(intCounter, 16),"000")
Es ist allerdings zu beachten, wie groß die größte Zahl ist, die in die Combobox eingetragen wird.
Mein Bsp geht davon aus, dass es sich um maximal 3-stellige Zahlen handelt.
Wenn du aber 4- oder noch mehr stellige Zahlen hast, dann musst du die Anzahl der Nullen entsprechend erhöhen.
Hilfts?
Ciao
Thorsten
Anzeige
AW: Führende Null wird nicht in ListBox1 eingetragen
10.08.2011 07:37:38
Josef

Hallo Josef,
statt
ComboBox15.AddItem wks3.Cells(intCounter, 16)

nimm
ComboBox15.AddItem wks3.Cells(intCounter, 16).Text

« Gruß Sepp »

Anzeige
AW: Führende Null wird nicht in ListBox1 eingetragen
10.08.2011 07:59:59
Josef
Hallo!
Danke für Eure Antwort. Jetzt klappt alles und beide Lösungen funktionieren.
Danke an Josef und an Oberschlumpf.
Schönen Tag noch
Josef
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige