Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Zahl 9 Stellig / Anzeigen nur 6 Stellig
#1
Question 
Hallo zusammen,

Ich habe folgendes Problem: Ich übertrage aus einer UserForm in eine Excel liste eine Nummer die immer anders ist z.b. so: 200903123 diese Zahl ist immer 9 Stellig jedoch möchte ich das nur die ersten 6 davon angezeigt werden es sollte jedoch alle 9 in der Zelle stehen da ich mit dieser Zahl weiter rechne.

Hat hier jemand zufällig eine Idee wie ich das umsetzen könnte?

Viele Grüße.
Antwortento top
#2
BenDefFmt 0.
Antwortento top
#3
(21.07.2020, 11:48)LCohen schrieb: BenDefFmt 0.

Hallo LCohen,


also wenn ivh bei der Benutzerdefinierten Formatierung bei TYP: 0. schreibe dann klappt das leider nicht.

Ich glaube das liegt daran das es von der UserForm befüllt wird.

Ich müsste irgendwie die Formatierung hierzu aktualisieren oder mit enter auf die Zelle klicken dann ändert sich die Formatierung.

Danke & viele Grüße
Antwortento top
#4
Hallo,

gemeint war die Zellenformatierung mit benutzerdefiniertem Zahlenformat. Wink

Gruß Uwe
Antwortento top
#5
(21.07.2020, 12:02)Kuwer schrieb: Hallo,

gemeint war die Zellenformatierung mit benutzerdefiniertem Zahlenformat. Wink

Gruß Uwe

Hallo Uwe,


das habe ich soweit verstanden.
Das klappt auch jedoch erst wenn ich auf die Zelle einmal mit enter bestätige.
Ich glaube das liegt daran das die Zelle mit Userform gefüllt wird.

Danke & Grüße.
Antwortento top
#6
Ich weiß gar nicht, was eine Jusoform ist und wofür man das braucht.
Antwortento top
#7
(21.07.2020, 12:05)Pascala schrieb: Ich glaube das liegt daran das die Zelle mit Userform gefüllt wird.

Wie sieht die Codezeile des "Füllvorgangs" aus?

Gruß Uwe
Antwortento top
#8
(21.07.2020, 12:07)Kuwer schrieb: Wie sieht die Codezeile des "Füllvorgangs" aus?


Hier der Code:


Code:
weit:
Dim X As Integer
For X = 1 To CInt(Me.TextBox5.Value)
                Code128Generate_v2 20, 20, 25, 2, Worksheets("Retouren_Template"), Worksheets("Retouren_Template").Cells(6, 2).Value, 90
                ActiveSheet.PrintOut Copies:=1
                ThisWorkbook.ActiveSheet.Shapes.SelectAll
                Selection.Delete
                Range("B5").FormulaLocal = "=RECHTS(B6;9)+1"
                Range("B6").Value = Range("B5").Value
Next X
             End If


es wird in B6 gefüllt
Antwortento top
#9
Hallo,

ohne den Sinn des Codes wirklich zu verstehen, wäre mein Vorschlag:
Range("B6").Value = CLng(Range("B5").Value)
Gruß Uwe
Antwortento top
#10
(21.07.2020, 12:21)Kuwer schrieb: Hallo,

ohne den Sinn des Codes wirklich zu verstehen, wäre mein Vorschlag:
Range("B6").Value = CLng(Range("B5").Value)
Gruß Uwe

Hat leider nicht die Lösung gebracht.

fällt dir vielleicht noch eine Lösung ein womit man einfach die letzten 3 Ziffern ausblendet?
Mir ist auch leider aufgefallen das er mit dem Benutzerdefinierten Zahlenformat die verkürzte Zahl rundet.

Viele Grüße.
Antwortento top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste