Anzeige
Archiv - Navigation
128to132
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
128to132
128to132
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wert aus einer Zelle in 2 Zellen

Wert aus einer Zelle in 2 Zellen
18.06.2002 09:47:20
Joachim S

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Wert aus einer Zelle in 2 Zellen
18.06.2002 10:49:36
Martin
Hallo Josi,
das folgende Makro funktioniert nur, wenn deine Tabelle immer so aufgebaut ist, wie du sie dargestellt hast. D.h. die aufzuteilenden Daten sind immer in Spalte 1, 3, 5, bzw. A, C, E, usw.

Sub Aufteilen()
Dim Spalte As Integer
On Error Resume Next
For Spalte = 1 To 25 Step 2
Columns(Spalte).TextToColumns Destination:=Cells(1, Spalte), _
DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
Other:=True, OtherChar:=":", FieldInfo:=Array(Array(1, 1), Array(2, 1))
Next Spalte
End Sub

ebenfalls heisse Grüße aus Italien
Martin

Anzeige
Re: Wert aus einer Zelle in 2 Zellen
18.06.2002 11:08:44
Joachim
Vielen Dank

Und weiter frohes schwitzen
ich hoffe am Meer

341 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige