Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1532to1536
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
1532to1536
1532to1536
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Inhalt in zwei Zellen aufteilen

Inhalt in zwei Zellen aufteilen
16.01.2017 10:46:02
Doddi
Hallo,
ich habe folgendes Problem:
In einer Excel-Tabelle mit Makros wird durch klick auf die Zelle ein Fenster geöffnet in diesem man die Überschrift eingibt und durch enter bestätigt.
Danach kann man als Unterprunkt in der gleichen Zelle weitere Angaben machen.
Die Überschrift wird größer und fett dargestellt und die Unterpunkte in Standard.
Da wir jetzt die Punkte auf der Liste mit einem anderen Programm verwalten wollen sollte nun die Überschrift und die Erläuterungen (Unterpunkte) in 2 Zellen stehen.
Gibt es da eine Möglichkeit (Makro) ohne von Hand alles mit c/p zu machen
Userbild

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

Betreff
Datum
Anwender
Anzeige
AW: Inhalt in zwei Zellen aufteilen
16.01.2017 11:24:43
Werner
Hallo Doddi,
soll die Überschrift und jeder Unterpunkt in einer eigenen Zelle stehen? Lade doch mal eine kleine Beispieldatei hoch auf der ersichtlich ist, wie es seither aussieht und wie es zukünftig aussehen soll.
Gruß Werner
AW: Inhalt in zwei Zellen aufteilen
16.01.2017 11:49:29
UweD
Hallo
so?
Beispile für B1
Userbild
Sub trennen()
    Dim RNG As Range, TText As String, Trenn As Integer
    
    With Sheets("Tabelle1")
        Set RNG = .Range("B1")
        TText = RNG
        Trenn = InStr(TText, vbLf)
        RNG.Offset(0, 1) = Left(TText, Trenn - 1)
        RNG.Offset(1, 1) = Mid(TText, Trenn + 1)
    End With
End Sub
LG UweD
Anzeige
AW: Inhalt in zwei Zellen aufteilen
16.01.2017 13:43:17
Doddi
Vielen Dank
dein Code hat wunderbar funktioniert :)
Habe ihn gleich noch angepasst auf nebeneinander nur habe ich jetzt Probleme ihn auf die ganze Spalte B zu erweitern.
Meine Anpassungsversuche scheitern....
Wie müsste ich es umändern, sodass ich Zellen markiere und dann das Makro ausführe?
https://www.herber.de/bbs/user/110605.xlsm
Grüße Doddi
AW: Inhalt in zwei Zellen aufteilen
16.01.2017 13:59:28
UweD
Hi
so?
Sub trennen()
    Dim TText As String, Trenn As Integer, SP As Integer
    Dim ZE As Integer, LR As Long, i As Long
    
    SP = 2 'Spalte B 
    ZE = 3 'ab Zeile 
    With Sheets("Tabelle1")
        LR = .Cells(.Rows.Count, SP).End(xlUp).Row 'letzte Zeile der Spalte B 
        For i = ZE To LR
            TText = .Cells(i, SP)
            Trenn = InStr(TText, vbLf)
            .Cells(i, SP + 1) = Left(TText, Trenn - 1)
            .Cells(i, SP + 2) = Mid(TText, Trenn + 1)
        Next
    End With
   
   
End Sub
LG UweD
Anzeige

301 Forumthreads zu ähnlichen Themen

Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Anzeige
Formel "Text" ROTE Zahl bei Minuswert?
dieter(drummer)

Hi Formelspezialisten,
in Zelle B2 steht dise Formel (funktionert auc h):
=TEXT(I4-D4;"00.0")&" ("&TEXT(I4/D4-1;"0%")&")".
Mein Ziel, dass eine Minuszahl in ROT erscheint. Hab's mit bedingte Formatierung versucht und bekomme es nicht hin.
Gibt es eine Möglichkeit, a...
12.08.2008 10:59:29
Thread-ID: 1001135
7 Beiträge
Textteile in Zellen mit Liste vergleichen
susidimarca

Hallo,
ich habe derzeit ein kniffeliges Excelproblem.
ich möchte gerne den Text in Zellen
hjgshgjdf Kriterium2 kjhfkjhfksdjhf
dskj Kriterium1 ajdhasjdhakjdhakdhajkdhajkdakj
daudzauizdaiudzaidzaisdz Kriterium3 kajhdasks
mit den Kriterium eine anderen Tabelle vergleichen...
21.08.2008 10:05:00
Thread-ID: 1003378
6 Beiträge
Anzeige
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
Automatisch Zeilen einfügen und Text reinschreiben
oblivion

Hallo,
hab folgendes Problem.
Ich habe ein Tabelle mit 4 Spalten. Wegen dem automatischen Zeilenumbruch habe ich keine vebundenen Zeilen.
In Excel ist die Zeilenhöhe ja auf 409 begrenzt. Ich habe aber teilweise Text der größere Spalten bräuchte.
Wenn ich die Spalte größer mach...
02.09.2008 20:54:00
Thread-ID: 1006942
5 Beiträge
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
Spaltentrennzeichen nach speichern in Text-Datei
Michael

Hallo
ich habe ein Problem. Vielleicht ist es schwierig, vielleicht aber auch nicht.
Ich habe eine Text-Datei mit Spaltentrennzeichen "|" (besser als ";" der Übersichtlichtlichkeit halber) und verschiedenen Längen der Spalten.
Ich will diese in Excel überarbeiten und als Text-Dat...
11.09.2008 09:28:00
Thread-ID: 1008978
3 Beiträge
Text in Spalten
Simone

Hallo zusammen,
ich hab ein wohl eher triviales Problem, komme aber trotzdem einfach nicht weiter.
Ich füge in ein Arbeitsblatt Daten aus einem anderen Programm ein. Jetzt habe ich mehrmals die Funktion 'Text in Spalten' verwendet / ausprobiert, und wenn ich jetzt wieder Daten in A1 ein...
16.09.2008 13:54:00
Thread-ID: 1010092
3 Beiträge
Anzeige

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
2
4
6
5
3
14
4
3
2
2
1
2
6
2
3
1
6
6
4
1
2
2
5
2
5