Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1912to1916
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1912to1916
1912to1916
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Excel VBA - Wert zweistellig übernehmen

Excel VBA - Wert zweistellig übernehmen
04.01.2023 12:29:46
Pascal
Hallo liebes Forum,
ich suche nach einer Möglichkeit einen Zellenwert aus Excel (z.B. "1"), 2-stellig (z.B. "01") im VBA-Code zu verwenden.
Konkret nutze ich den Wert um die Datei nach bestimmten Werten in der Excelzelle BI1 und BI2 zu benennen.
Datei = .Range("BI1") & "_" & .Range("BI2")
Die Datei würde jetzt bei BI1 = 1 und BI2 = 2 "1_2" heißen.
Ich möchte jedoch, dass sie "01_02" heißt.
Wenn ich in Excel selbst das Format der Zelle auf "00" ändere, steht die Zahl zwar in Excel als "01" aber die Datei würd über VBA trotzdem als "1_2" benannt.
Sicher habt ihr Ideen dazu :).
Vielen Dank und liebe Grüße
Pascal

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

Betreff
Datum
Anwender
Anzeige
AW: Excel VBA - Wert zweistellig übernehmen
04.01.2023 12:33:28
Rudi
Hallo,
z.B.

Datei = Format(.Range("BI1") ,"00") & "_" & Format(.Range("BI2"),"00")
Gruß
Rudi
AW: Excel VBA - Wert zweistellig übernehmen
04.01.2023 12:42:05
GerdL
Hallo Pascal!

Sub Unit()
Dim strDatei As String
Range("BI1") = 1
Range("BI2") = 2
strDatei = Format(Range("BI1"), "00") & "_" & Format(Range("BI2"), "00")
MsgBox strDatei
End Sub
Gruß Gerd
AW: Excel VBA - Wert zweistellig übernehmen
04.01.2023 12:54:35
Pascal
Hat geklappt!
Vielen vielen Dank!
Gruß
Pascal
AW: Excel VBA - Wert zweistellig übernehmen
04.01.2023 17:15:11
Daniel
Hi

Datei = Format(.Range("BI1") * 100 + .Range("BI2"), "00\_00")
Gruß Daniel
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige