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

Zelleintrag verteilen

Forumthread: Zelleintrag verteilen

Zelleintrag verteilen
06.06.2002 19:14:50
Michael
Hallo
Ist es irgendwie möglich, wenn ich in einer Zelle einen Namen stehen habe, das dieser per Formel oder Makro auseinander genommen wird und in verschiedene Zellen eigetragen wird.
Also z.B. in Zelle A1 steht "Excel-Forum" , dann soll in
Zelle A2 das E in
Zelle A3 das x in
Zelle A4 das c usw. stehen.

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zelleintrag verteilen
06.06.2002 19:39:59
Joachim L.
Hallo Michael,

probier es mit folgendem Makro. Nur mal schnell gemacht. Kann natürlich noch verbessert/verfeinert werden.

Sub Verteilen()
Dim lngLaenge As Long

lngLaenge = Len(Cells(1, 1).Value)

For lngLaenge = 1 To lngLaenge
Cells(lngLaenge + 1, 1).Value = Mid(Cells(1, 1), lngLaenge, [1])
Next lngLaenge

End Sub

Gruß Joachim

Anzeige
Re: Klappt nicht
06.06.2002 21:40:08
Michael
Irgendwie klappt das nicht.
Mit Makros hab ichs auch noch nicht so ganz.
Re: Zelleintrag verteilen
06.06.2002 22:27:23
WernerB.
Hallo Michael,

Formeln in
A2: =LINKS(A1;1)
A3: =TEIL(A1;2;1)
A4: =TEIL(A1;3;1)
usw.

Viel Erfolg wünscht
WernerB.

Re: Zelleintrag verteilen
06.06.2002 22:29:29
PeterW
Hallo Michael,

mit folgendem Code sollte es funktionieren:

Gruß
Peter

Anzeige
Re: Zelleintrag verteilen
06.06.2002 22:47:02
PeterW
Sorry, kleiner Fehler - große Wirkung.

Richtig ist es natürlich

Peter

Forumthreads zu verwandten Themen

Anzeige
Anzeige