Excel Zellinhalt in mehrere Zeilen extrahieren WIE????
O.L.
Ich habe eine Tabelle in deren Zellen z.B. " ,2,45,56b " steht
nun möchte ich diesen Zellinhalt in (hier) drei neue Zeilen haben .
Also 2
45
56b
Wie ist so etwas zu machen ??
Außer per Hand Zeile einfügen und Werte reinschreiben
Hans W. Herber
Hallo (bitte Name angeben!)
folgendes Makro in ein *englischsprachiges* Modulblatt einfügen, einer
Schaltfläche zuweisen, den Zellzeiger auf die Zelle mit der Zeichenfolgen
setzen und das Makro starten:
Sub Aufteilen()
Dim AC As Range
Dim n%, TMP$
Set AC = ActiveCell
TMP = AC.Value
n = 1
While IsEmpty(TMP) = False
AC.Offset(0, n) = vName(TMP)
On Error GoTo Beenden
TMP = Right(TMP, Len(TMP) - (Len(AC.Offset(0, n)) + 1))
n = n + 1
Wend
Beenden:
End Sub
Gruss Hans
--
****************************************************
* Herber's Excel-Server - letztes Update: 11.01.98 *
* http://www.herber.de - Mail: her...@herber.de *
* Microsoft MVP - Excel *
* Alle Demos jetzt im XLS- und ZIP-Format *
****************************************************
O.L. schrieb in Nachricht ...
Hans W. Herber
Sorry, ich vergaß eben die zugehörige Funktion, die ebenfalls in das
Modulblatt eingefügt werden muß:
Function vName(C)
Dim i%
i = InStr(C, ",") - 1
If i > 0 Then vName = Left$(C, i) Else vName = C
End Function
Gruss Hans
--
****************************************************
* Herber's Excel-Server - letztes Update: 11.01.98 *
* http://www.herber.de - Mail: her...@herber.de *
* Microsoft MVP - Excel *
* Alle Demos jetzt im XLS- und ZIP-Format *
****************************************************
Hans W. Herber schrieb in Nachricht ...
Rolf Dressel
O.L. wrote:
>
> Ich habe eine Tabelle in deren Zellen z.B. " ,2,45,56b " steht
> nun möchte ich diesen Zellinhalt in (hier) drei neue Zeilen haben .
> Also 2
> 45
> 56b
>
> Wie ist so etwas zu machen ??
> Außer per Hand Zeile einfügen und Werte reinschreiben
Hallo O.L.
mit Daten, Text in Spalten läßt sich Dein Problem ganz einfach lösen:
Feld (ggf gesamte Spalte) markieren, genannte Funktion aufrufen,
getrennt wählen, weiter, als Trennzeichen Komma wählen, weiter,
ggf. Datenformat ändern und Zielbereich ändern, Ende
Gruß
Rolf Dressel
Quantum Gesellschaft für Software mbH, Dortmund
mailto:dre...@quantum.de
Michael Werner
>O.L. wrote:
>>
>> Ich habe eine Tabelle in deren Zellen z.B. " ,2,45,56b " steht
>> nun möchte ich diesen Zellinhalt in (hier) drei neue Zeilen haben .
>Hallo O.L.
>
>mit Daten, Text in Spalten läßt sich Dein Problem ganz einfach lösen:
>Gruß
>
>Rolf Dressel
Hallo Rolf,
die Funktion Daten, Text in Spalten finde ich in Excel95 nicht.
Gab es die in einer aelteren Version oder gibt es die erst in Excel97?
Vielleicht suche ich ja auch nur falsch.
Ciao
Michael
--
********************************
* michael...@gmx.de *
* *
********************************
Heiko Scharf
Michael Werner schrieb
>die Funktion Daten, Text in Spalten finde ich in Excel95 nicht.
>Gab es die in einer aelteren Version oder gibt es die erst in Excel97?
>Vielleicht suche ich ja auch nur falsch.
Hallo Michael,
ich hab sie auch nicht gefunden
zu Deinem Problem schicke ich Dir per Email eine Lösung die ich mal für die
Trennung von Vor- und Nachnamen angefertigt habe ist allerdings noch ein
EXCEL4-Makro und kein VBA Modul
Heiko
Hans W. Herber
Hallo Michael,
was Rolf hier meint, ist Menü DATEN / TEXT IN SPALTEN ...
Verfügbar ab Excel5.
Gruss Hans
--
****************************************************
* Herber's Excel-Server - letztes Update: 26.01.98 *
* http://www.herber.de - Mail: her...@herber.de *
* Microsoft MVP - Excel *
****************************************************
Heiko Scharf schrieb in Nachricht <6ahpel$r7d$1...@news.metronet.de>...
Rolf Dressel
Hans W. Herber wrote:
>
> Hallo Michael,
>
> was Rolf hier meint, ist Menü DATEN / TEXT IN SPALTEN ...
> Verfügbar ab Excel5.
>
> Gruss Hans
>
Danke für den Hinweis, Hans.
habe schon so lange nicht mehr mit der Version 5.0 gearbeitet,
daß ich vergessen habe, daß die Funktion früher einmal anders
hieß.