Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
360to364
360to364
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Text ab der 2. Leezeile Abschneiden

Forumthread: Text ab der 2. Leezeile Abschneiden

Text ab der 2. Leezeile Abschneiden
08.01.2004 17:37:51
Jennifer Weinberg
Hallo,
ich habe eine Excel-Spalte vorliegen.
In in jeder einzelnen Zelle dieser Spalte befindet sich ein Text.
Bsp.:
Der Einzelhandel meldet Umsatzverluste
Die Automobilbranche befindet sich im Aufschwung.
Autofahrer sind jetzt besonders gefordert
usw.

Ich möchte nun den Text kürzen.
Dafür würde ich gerne das 2. Leerzeichen (alternativ auch das 3. Leerzeichen) als Trennzeichen verwenden.
Ich würde mich freuen, wenn mir jemand eine passende Formel dazu verraten würde.

Herzlichen Dank,
Jennifer
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Text ab der 2. Leezeile Abschneiden
08.01.2004 17:52:50
Jennifer Weinberg
ich hab's jetzt doch selbst gelöst.
Herzlichen Dank & Sorry, falls jmd. bereits daran gearbeitet haben sollte.
AW: Text ab der 2. Leezeile Abschneiden
08.01.2004 17:58:31
ChrisL
Hi
Habe bereits dran gearbeitet und drum post ichs auch ;-)
Option Explicit

Sub t()
Dim strText As String
Dim Lang As Integer
Dim Zelle As Range
For Each Zelle In ActiveSheet.UsedRange
If Zelle <> "" And InStr(Zelle, " ") > 0 Then
strText = Zelle
Lang = InStr(strText, " ")
strText = Right(strText, Len(strText) - InStr(strText, " "))
If InStr(strText, " ") = 0 Then Exit For
Lang = Lang + InStr(strText, " ") - 1
Zelle = Left(Zelle, Lang)
End If
Next Zelle
End Sub


Gruss
Chris
Anzeige
;

Forumthreads zu verwandten Themen

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
Formel, rechts #### bis leer Zeichen
mehmet

Hallo Forum,
in Zelle B2 habe ich z.B. "ABC 314 " stehen.
Nun möchte ich in Zelle D2 folgende String darstellen:
zähle von links vier Strings nach rechts "ABC "
mache aus "314 " nun eine vierstellige Zahl "0314 "
entferne die zwei Leerzeichen nach der Zahl "0314 ", so da...
16.09.2008 10:46:00
Thread-ID: 1009991
8 Beiträge
Anzeige
Alle Leerzeichen bis rechts von Ziffer löschen
Ziffer

Hallo Freaks,
ich habe in der Spalte B 1700 Zeilen, die mit Artikelbezeichnungen folgenden Musters befüllt sind:

Mein Ziel ist es, alle Leerzeichen bis auf zwei nach der letzten Ziffer und dem ersten Buchstaben zu löschen. Also ab der 11 Stelle bis zur 16 Stelle alle Leerzeichen bi...
13.12.2008 21:41:36
Thread-ID: 1032708
3 Beiträge
Anzeige
Macro gesucht Text teilen ab Zeichen "-"
Tom

Liebes Forum,
ich suche ein Macro welches mir alle Zeichen links vom "-" (Minus) in eine neue Spalte B und alle Zeichen rechts vom Minus in die neue Spalte C kopiert. Das "-" (Minus) kann ggf. öfter vor kommen, ich möchte es nur auf das erste von links beziehen.
Konkret
Textxyz 79.x...
06.07.2009 12:18:48
Thread-ID: 1086596
2 Beiträge
Anzeige
Macro gesucht Text teilen ab Zeichen "-"
Tom

Liebes Forum,
ich suche ein Macro welches mir alle Zeichen links vom "-" (Minus) in eine neue Spalte B und alle Zeichen rechts vom Minus in die neue Spalte C kopiert. Das "-" (Minus) kann ggf. öfter vor kommen, ich möchte es nur auf das erste von links beziehen.
Konkret
Textxyz 79.x...
06.07.2009 12:19:17
Thread-ID: 1086598
9 Beiträge
ausschneiden ab bestimmten zeichen
walter

Hallo an Alle,
ich moechte aus bestehenden Datensätzen alle Zeichen auslesen, die nach dem Gleichheitszeichen (in jedem DSatz enthalten) enthalten sind. Aber Achtung, unterschiedliche Längen.
Danke + Gruß
Walter
12.10.2009 12:32:03
Thread-ID: 1109050
2 Beiträge
Wenn-Formel in Abh. von 1. Zeichen in Zelle
1.

Hallo zusammen,
kennt jemand eine Wenn-Funktion die das erste Zeichen einer Zelle bewertert?
Sachverhalt:
A1: 0123423; die erste Ziffer ist eine Null
A2: 1123423; die erste Ziffer ist keine Null
Der Zellinhalt (A1 und A2) stellt Filialnummern dar, die je nachdem ob vorne ei...
17.02.2010 14:13:20
Thread-ID: 1139231
3 Beiträge
Anzeige
Text in Zelle bis Zeichen ; vertauschen
Helmut

Hallo User,
eine kurze Frage:
Wie kann ich in einer Zelle Einen gewissen Text bis zum Zeichen ; nehmen und an den weiteren Text hintanhängen?
z.B:
Text in Zelle lautet:
L=7050;DN=50
Gewünschtes Resultat in der Zelle soll sein:
DN=50;L=7050
Kann mir hier wer helfe...
04.05.2010 16:16:19
Thread-ID: 1155393
3 Beiträge
Text in Zelle bis Zeichen ; vertauschen
Helmut

Hallo User,
eine kurze Frage:
Wie kann ich in einer Zelle Einen gewissen Text bis zum Zeichen ; nehmen und an den weiteren Text hintanhängen?
z.B:
Text in Zelle lautet:
L=7050;DN=50
Gewünschtes Resultat in der Zelle soll sein:
DN=50;L=7050
Kann mir hier wer helfe...
04.05.2010 16:16:55
Thread-ID: 1155394
2 Beiträge
Leerzeichen nach Text in Zelle löschen
Helmut

Liebe Forenuser,
ich habe noch eine Frage für heute:
Wie kann ich die Leerzeichen nach einem Text in allen Zellen in einem Tabellenblatt löschen?
Genauer:
Wenn ich z.B. in eine Zelle hineingehe, dann stehe ich oft nicht genau nach dem letzten Zeichen in der Zelle, sondern weiter...
07.05.2010 13:54:48
Thread-ID: 1156080
3 Beiträge
Ab bestimmter Zeichenzahl abschneiden
Olaf

Hallo
Ich schreibe mittels eines VBA-Scripts den Inhalt einer Excel-Tabellen-Zelle in eine Text-Datei.
Das mache ich mit:
Print #iFile, Cells(iRow, 18)
Nun möchte ich gerne, dass der Text nach 390 Zeichen abgeschnitten wird.
Es sollen also in die Text-Datei nur die ersten 39...
01.04.2011 11:38:52
Thread-ID: 1208659
2 Beiträge
Texteingabe größer als 30 Zeichen teilen
Florian

Hallo zusammen,
ich habe mal wieder ein Problem, ich habe ein Makro geschrieben welches die Eingabe in Excel überwacht.
Wenn die Stringlänge größer 30 Zeichen ist soll der Inhalt in die zelle darunter geschrieben werden.
Funktioniert soweit super, es werden sogar Stringlängen von z....
09.08.2012 00:38:27
Thread-ID: 1274315
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige