Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
952to956
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
952to956
952to956
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zelleninhalte trennen mit Text in Spalten ?

Zelleninhalte trennen mit Text in Spalten ?
22.02.2008 15:36:00
Selma
Hallo Leute,
ich habe versucht per VBA (da ich dies in eine anderes Makro einfügen möchte) die Zelleninhalte der Spalte H (vorher als Text formatiert) zu splitten. Leider werden die Inhalte ohne die Null (siehe Beispiele) getrennt.
Vorher:
H
1207-E03
1307-E03
1407-E03
1508-E04
1608-E04
1708-E04
1808-E04

Nachher (falsch):
Sub Trennen()
Range("H2:H" & Range("A65536").End(xlUp).Row).Select
Selection.TextToColumns Destination:=Range("H2"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
:="-", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True
End Sub
Was muss ich ändern, damit die Inhalte als Text erkannt werden?
Vielen Dank im Voraus !
Liebe Grüße,
Selma

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

Betreff
Datum
Anwender
Anzeige
AW: Zelleninhalte trennen mit Text in Spalten ?
22.02.2008 15:46:00
Beverly
Hi Selma,
formatiere die Spalte H benutzerdefiniert als 00.


AW: Zelleninhalte trennen mit Text in Spalten ?
22.02.2008 15:51:01
Renee
Hi Selma,
so:

Selection.TextToColumns Destination:=Range("H2"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
:="-", FieldInfo:=Array(Array(1, 2), Array(2, 1)), TrailingMinusNumbers:=True


Ist ist die 2 im ersten Array-Element ;-)
GreetZ Renée

Anzeige
Danke Karin, danke Renée !!!
22.02.2008 17:26:00
Selma
Danke Karin, danke Renée !!!
LG,
Selma

337 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige