Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1556to1560
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

0 vorne dran bleibt nicht

0 vorne dran bleibt nicht
18.05.2017 09:13:20
Manuela
Hallo,
ich habe hier ein VBA Code bei dem ich die Zahlen in den Feldern schreibe. Leider haben die Zahlen immer einer 0 NULL davor. Diese bleibt aber trotz formatierung nicht stehen.
Wenn ich die Zahl Händisch ohne VBA eingebe, dann funktioniert es.
Sub Daten_Ausfuellen()
Dim sTabCopyName$, sTabNewName$, iZahl%
Dim lZahl As Long
lZahl = InputBox("Barcode 1", "Zahl_C1")
Range("C1").Value = lZahl
lZahl = InputBox("Barcode 2", "Zahl_C2")
Range("C2").Value = lZahl
End Sub

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
NumberFormat = "@"
18.05.2017 09:35:23
Matthias
Hallo
Evtl hilft das.
Range("C1").NumberFormat = "@"
Range("C1").Value = lZahl
Dann steht allerdings Text in der Zelle.
Gruß Matthias
evtl auch NumberFormat = "00000"
18.05.2017 09:43:13
Matthias
Hallo
oder Du probierst
NumberFormat = "00000"
Je nachdem wie lang Deine Zahlenkolonne ist, soviele Nullen eintragen.
Dann bleibt es eine Zahl.
Gruß Matthias
AW: 0 vorne dran bleibt nicht
18.05.2017 09:53:54
Daniel
Hi
die Werte sind Barcodes.
dh mit diesen Werten wird nicht gerechnet, daher kann man sie wie Texte behandeln.
Dann so:

Sub Daten_Ausfuellen()
Dim sTabCopyName$, sTabNewName$, iZahl%
Dim lZahl As String
lZahl = InputBox("Barcode 1", "Zahl_C1")
Range("C1").Value = "'" & lZahl
lZahl = InputBox("Barcode 2", "Zahl_C2")
Range("C2").Value = "'" & lZahl
End Sub
die Variable, die den Wert der Inputbox aufnimmt, muss vom Typ String sein.
Ist sie vom Typ Long, dann verschwindet die 0 schon bei der Übergabe des Inputbox-Ergebnisses an die Variable, weil dann der Inputboxtext in eine Zahl gewandelt werden muss (Zahlen haben nie eine führende 0)
das Hochkomma ist das Texterkennungszeichen.
es gehört nicht zum Text, verhindert aber dass der Wert in eine Zahl gewandelt wird, wenn du den Wert in eine Zelle schreibst.
(das ist die Alternative zum Zahlenformat "@", welches in manchen Fällen problematisch sein kann)
Gruß Daniel
Anzeige
AW: 0 vorne dran bleibt nicht
18.05.2017 11:46:27
Manuela
Vielen Dank Daniel
Und auch danke für die Ausführliche Beschreibung wieso das so ist :-)
Wieder was gelernt.
Gruß
Manu

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige