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

Text in Spalten (Makroaufzeichnung)

Forumthread: Text in Spalten (Makroaufzeichnung)

Text in Spalten (Makroaufzeichnung)
06.09.2006 11:02:54
Hermann
Guten morgen,
ich hab mal ne Frage. Ich bin in VBA noch nicht so fit. Wie kann ich u.g. Aufzeichnung für einen Bereich z.B. E - BZ abkürzen. Ich habe Zahlen im falschen Format (1.83) und möchte es in 1,83 umwandeln, damit Excel es als Zahlen erkennt.
Columns("E:E").Select
Selection.TextToColumns Destination:=Range("E1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(1, 1), DecimalSeparator:=".", ThousandsSeparator:=","
Columns("F:F").Select
Selection.TextToColumns Destination:=Range("F1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(1, 1), DecimalSeparator:=".", ThousandsSeparator:=","
usw.
Kann man da irgendeine Schleife einbauen, so dass sich das Makro drastisch reduziert?
Danke Hermann
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Text in Spalten (Makroaufzeichnung)
06.09.2006 11:08:42
{mskro}
Hallo Hermann,
könntest du nicht den Weg über "Bearbeiten", "Ersetzen", "alle Ersetzen" gehen?
Gruss Manfred
Rückmeldung wäre nett!
AW: Text in Spalten (Makroaufzeichnung)
06.09.2006 11:17:49
Hermann
Hallo Manfred,
ups..so weit war ich noch gar ned. Klar..so müsste es funktionieren. Ich hab auch manchmal folgendes Format.
18,000.00
Folglich müsste ich zuerst die Kommas mit "" ersetzen und dann die Punkte mit ",".
Manchmal denke ich zu kompliziert!
Gruss Hermann
Anzeige
genau so (o.T.)
06.09.2006 11:20:15
{mskro}
.
Gruss Manfred
Rückmeldung wäre nett!

Forumthreads zu verwandten Themen

Anzeige
Anzeige