Zahlen wandeln sich in Datum um

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Also ich habe einfach mal Makro aufgenommen, wenn ich CSV-Datei (Hier "Test.csv") in bestehende Tabelle (hier ab Zelle B2) einfüge mit Vorgabe "Alle Spalten sind Text".
Dann kommt das raus:


With ActiveSheet.QueryTables.Add(Connection:="TEXT;F:\Downloads\Test.csv", Destination:=Range("$B$2"))
.Name = "Test"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.TextFilePromptOnRefresh = False
.TextFilePlatform = 850
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = False
.TextFileSemicolonDelimiter = False
.TextFileCommaDelimiter = True
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(2, 2, 2)
.TextFileTrailingMinusNumbers = True
.Refresh BackgroundQuery:=False
End With

Da sind ein Haufen Defaults drin definiert.
Meiner Meinung nach reicht:


Range("B2").Select
With ActiveSheet.QueryTables.Add(Connection:="TEXT;F:\Downloads\Test.csv", Destination:=Range("$B$2"))
.AdjustColumnWidth = True
.TextFilePlatform = 850
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileCommaDelimiter = True
.Refresh BackgroundQuery:=False
End With

Ich selber lese solche Datein immer in VBA direkt ein und verwende die Werte gleich so, wie ich will...

Hallo Günther,
auch ich bin seit einigen Jahr(zehnt)en hier im Forum als Helfer unterwegs. Meine Beobachtung ist allerdings, dass früher die Helfer einfach mehr Bereitschaft hatten in unklaren Fällen mal Nachzufragen - heute scheint es mir, dass immer gleich die perfekte Frage erwartet wird. Und wehe, die Excelversion ist nicht angegeben oder die Level-Selbsteinschätzung stimmt nicht!
Meine Meinung: Die Frager können gar nicht perfekt fragen und auf alles eingehen - wenn sie den dafür nötigen Wissensstand hätten, würden sie ja nicht nachfragen müssen.
Mir selbst macht es sogar Spaß, den Fragern die nötigen Details Stück für Stück "aus der Nase" zu ziehen und so das Excel-Rätsel irgendwann im ganzen zu sehen und zu lösen. Wem das keinen Spaß macht ... der muss auf unvollständige Anfragen ja nicht antworten.
Zum aktuellen Topic: Dass Excel Texte fälschlich als Datum erkennt ist ein so verbreitetes Problem, dass es darüber sogar Memes gibt (Whats the similarity of Excel and Incel? They both mistake it as a date) und bereitet vielen Kopfschmerzen, auch mir noch. Wo Sarah H. nicht genügend auf die Vorschläge zur Lösung eingegangen ist, sehe ich nicht, Günther.
Nix für ungut, nur mein Senf.
LG,
Klaus M.

Beliebteste Forumthreads (12 Monate)

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

304 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

	B	C
1	Text	Zahl
2	02.09.2021	44441

Zahlen wandeln sich in Datum um

12 Beiträge zum Forumthread Beiträge zu diesem Forumthread

304 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread