Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
292to296
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
292to296
292to296
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellinhalt teilen und in verschiedene Zellen schre

Zellinhalt teilen und in verschiedene Zellen schre
17.08.2003 13:37:40
Steph@n
Hallo,
habe ne Datei bekommen, in der in den Zellen stets mit dem Zeilenumbruch gearbeitet wurde (ALT + ENTER).
Ich benötige die Inhalte jeder einzelnen Zeile innerhalb der Zelle jedoch in separaten Zellen.
Gibt es eine Funktion, die mir die Zellen aufsplitten kann? Oder hätte jemand vielleicht ein Makro zur Hand?
Gruß Stephan

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellinhalt teilen und in verschiedene Zellen schre
17.08.2003 13:55:54
Nepumuk
Hallo Stephan,
versuch es mal so:

Option Explicit
Public Sub test()
Dim bereich As Range, zelle As Range, zeile As Long, spalte As Integer, zeichen As Integer
Set bereich = ActiveSheet.UsedRange
For Each zelle In bereich
spalte = bereich.Columns.Count + 2
zeile = zelle.Row
zelle = Trim(zelle)
For zeichen = 1 To Len(zelle)
If Asc(Mid(zelle, zeichen, 1)) > 32 Then Cells(zeile, spalte) = Cells(zeile, spalte) & Mid(zelle, zeichen, 1) Else spalte = spalte + 1
Next
Next
End Sub

Code eingefügt mit: Excel Code Jeanie
Gruß
Nepumuk

Anzeige
AW: Zellinhalt teilen und in verschiedene Zellen schre
17.08.2003 14:36:44
Steph@n
Hi Nepumuk,
Makro hat leider nicht funktioniert! Läuft zwar durch, aber es passiert nichts!
Aber Makro von Michael funzt! Trotzdem vielen Dank!
Gruß Stephan

AW: Zellinhalt teilen und in verschiedene Zellen schre
17.08.2003 14:07:14
Michael Brüggemann
Hallo Stephan,
das folgende Makro verteilt Dir den markierten Bereich in die Spalte "B" (ggf. anpassen).

Sub Daten_auf_Spalten_verteilen()
Selection.TextToColumns Destination:=Range("B1"), DataType:=xlDelimited, _
TextQualifier:=xlNone, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
:=vbLf, FieldInfo:=Array(1, 1)
End Sub

CIAO
Michael

Anzeige
AW: Zellinhalt teilen und in verschiedene Zellen schre
17.08.2003 14:38:33
Steph@n
Supi! Funzt! Danke!
Gruß Stephan

300 Forumthreads zu ähnlichen Themen

Daten aus einer Zelle auf mehrere Zellen aufteilen
Gordon

Moin,
ich habe hier einer Zelle (A10) eine bis mehrere Zeichenketten, die jewiels durch ein ";" getrennt werden.
Nun soll jeweils jede Zeichenkette auf drei Zellen aufgespilltet werden:
A1 = Die ersten 10 Zeichen der 1.Kette
B1 = Die nächsten 10 Zeichen der 1.Kette
C1 = Die...
23.08.2008 22:57:00
Thread-ID: 1004183
15 Beiträge
Anzeige
Zelleninhalt (Text) in 2 Spalten teilen
El.

Hallo!
Habe eine Spalte in der Artikelname und Artikelmerkmale, durch drei Punkte getrennt "...", zusammen stehen. Beispiel: Lecker Whisky 21 Jahre ... Lieferung in hochwertiger Schatulle
Wie krieg ich nun den Text links der Punkte in eine extra Spalte und rechts der Punkte in eine extr...
03.09.2008 16:35:00
Thread-ID: 1007155
4 Beiträge
Inhalt einer Zelle aufteilen in Zellen untereinand
thorsten

Hallo,
bitte schaut Euch mal die Liste an
https://www.herber.de/bbs/user/56516.xls
Es geht darum, dass in einer Zelle mehrere email Adressen angegeben sind - getrennt durch ein Semikolon.
Gibt es eine Möglichkeit diese untereinander darzustellen - je eine Adresse in einer zelle...
05.11.2008 12:35:00
Thread-ID: 1021856
4 Beiträge
Anzeige
Zelleninhalt mit Makro auf Spalten aufteilen
Rene

Hallo Experten,
ich benötige bitte eure Hilfe und hoffe, dass meine erste Problemschilderung nicht zu unverständlich ist.
Hier mein Problem bzw. Wunsch-Makro:
Farblich markierte Zellen in Tabelle1: C1: =3453,63+235,64-23563,12
D5: =1234,43-234+234.... usw.
Aufteilung de...
15.02.2009 14:48:00
Thread-ID: 1050879
5 Beiträge
Zelleninhalt teilen
Sandro

hallo
wie kann ich den zelleninhalt teilen und die eine hälfte in die benachbarte zelle kopieren.
beispiel:
Zelle A1: 40900518/240900067
Die Nr. 40900518 soll in der Zelle bleiben
Die Nr. 240900067 soll in die Zelle B1 kopiert werden
Der / soll gelöscht werden.
Danke...
25.02.2009 16:57:21
Thread-ID: 1054069
6 Beiträge
Zellenwert teilen, in listenfeld, verlinken
Tobias

Hallo,
ich weiß nicht ob das möglich ist, aber ich versuche folgendes:
In B habe ich ordnernamen, kommagetrennt:
z.b. B10
"Ordner1, Ordner2, Ordner3"
Wenn B10 selektiert ist, und ich das Makro auslöse, möchte ich, dass ein Listenfeld auftaucht mit dem Namen der 3 Ordner unt...
17.03.2009 03:28:10
Thread-ID: 1060982
11 Beiträge
Zwei Zeilen in einer Zelle
Michael

Hallo,
ich habe folgendes Problem. In einer Zelle steht ein Ort allerdings steht dieser innerhalb der Zelle nach unten verrückt, so dass in der Zelle quasi eine Leerzeile ist. Gibt es eine Möglichkeit diese Leerzeilen innerhalb der Zellen zu löschen?
Ich habe hier mal eine Grafik eingef...
26.03.2009 13:12:43
Thread-ID: 1064220
5 Beiträge
Zwei Bezüge in eine Zelle
Willy

Hallo "Profis",
wer kann mir bitte bei folgendem Problem helfen:
In Zelle A 1 steht Datum (1.1.09), in Zelle A 2 steht das zweite Datum (7.1.09), also IMMER eine Laufzeit von 7 Tagen.
Nun soll bspw. in Zelle A 3 ausgegeben werden:
1.1.09 - 7.1.09
Danke im voraus.
Gruß
10.06.2009 12:10:04
Thread-ID: 1080409
4 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
14
1
3
3
4
4
5
10
4
3
2
3
3
4
6
2
6
7
4
3
3
6
3
5
2