Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
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
300to304
300to304
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilenumbruch mittels VBA?

Forumthread: Zeilenumbruch mittels VBA?

Zeilenumbruch mittels VBA?
26.08.2003 18:32:55
Josef
Hallo!

Ich habe z. B. folgende Zeile:

Ambulatorium f. Labordiagnostik Bruck/Leitha: Niederösterreich Ordner 6

Gibt es bitte die Möglichkeit mittels VBA in allen Datensätzen diesen Zeilenumbruch zu erreichen:

Ambulatorium f. Labordiagnostik Bruck/Leitha:
Niederösterreich Ordner 6

Manuelle Lösung wäre ALT+Enter.
Nur habe ich leider eine Menge Datensätze.

Danke
Josef
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenumbruch mittels VBA?
26.08.2003 18:59:45
andre
hallo josef,
im prinzip so:

Sub Makro1()
' Makro1 Makro
' Makro am 26.08.2003 von wanderer aufgezeichnet
Dim i% ' % bei integer, & bei long
' Trennung nach dem ersten Doppelpunkt einer Zeichenkette
For i = 1 To 100 ' hier Beginn- und  Endzeile eingeben
If InStr(1, Cells(i, 1), ":") > 1 Then
Cells(i, 1) = _
Left(Cells(i, 1), InStr(1, Cells(i, 1), ":")) & _
Chr(10) & _
Right(Cells(i, 1), Len(Cells(i, 1)) - InStr(1, Cells(i, 1), ":") - 1)
End If
Next
End Sub

gruss andre
Anzeige
AW: Zeilenumbruch mittels VBA?
26.08.2003 19:07:29
Josef
Hallo Andre!
Besten Dank für Deine Hilfe. Hat alles bestens funktioniert.
Josef
AW: Zeilenumbruch mittels VBA?
26.08.2003 19:04:48
Matthias G
Hallo Josef,

Jetzt war Andre schneller und hat schon was brauchbares geschrieben.
Trotzdem noch meine Variante:


Sub Zeilenumbruch(ber As Range) 'Zellen in angegebnenen Bereich durchsuchen
Const Trennzeichen = ":" 'Zeilenumbruch nach dem ersten gefundenen Zeichen
Dim i, l As Long
Dim t1, t2 As String
Dim b As Variant
For Each b In ber
i = InStr(1, b, Trennzeichen)
If i <> 0 Then
l = Len(b.Value)
t1 = Left(b.Value, i)
t2 = Right(b.Value, l - i)
If Left(t2, 1) = Chr(32) Then t2 = Mid(t2, 2) 'evtl. führendes Leerzeichen abschneiden
b.Value = t1 + Chr(10) + t2
End If
Next b
End Sub


Viele Grüße,
Matthias
Anzeige
;

Forumthreads zu verwandten Themen

Zeilenumbruch bei verbundenen Zellen
oblivion

Hallo, ich habe mal eine Frage zum Zeilenumbruch. Wenn ich eine einzelne Zelle habe und über die Eigenschaften den Zeilenumbruch einstelle, dann wird automatisch die Zelle größer (nach unten) je mehr ich reinschreibe.
Wenn ich jetzt aber zwei oder mehr Zellen verbinde und die gleichen Einst...
22.08.2008 12:42:00
Thread-ID: 1003815
4 Beiträge
Zeilenumbruch im ScreenTip
Hans

Hallo,
kann mir jemand mitteilen wie ich im xml-Code einen Zeilenumbruch in dem Text für den Screentip erzwingen kann?
Danke
Hans
08.09.2008 15:14:29
Thread-ID: 1008174
5 Beiträge
VBA-Editor Zeilenumbruch
David

Hi Leute,
jetzt hab ich schon so viele Makros geschrieben, aber eins hab ich bisher nicht rausbekommen:
Wie erzeuge ich eigentlich MANUELL die Zeilenumbrüche im Editor? Wenn ich das Zeichen _ eingebe und anschließend Enter drücke, gehts jedenfalls nicht.
Ich hab auch noch nicht raus...
15.09.2008 18:03:53
Thread-ID: 1009867
4 Beiträge
Zeilenumbruch bei Leerschlag
Gregor

Hallo zusammen
Ich möchte per VBA bei folgender oder ähnlicher Zeichenkette bei jedem Leerschlag einen Zeilenubruch einfügen und diese dann je in eine Zelle schreiben (kopieren/transponieren):
15) RBDe ABo Bto AA TG 6690 6326
Ich habe im Archiv folgende Prozeduren gefunden, welche a...
18.09.2008 09:11:29
Thread-ID: 1010606
3 Beiträge
Anzeige
ComboBox Zeilenumbruch
Steffen

Hallo zusammen,
hab mal ne kleine Frage zu ner ComboBox. innerhalb der Combobox sollen 2Bemerkungen eingetragen werden können. Im Moment schreibt "er" mir diese Bemerkungen immer nur in eine lange zusammenhängende Zeile. Ich will aber eine Art Zeilenumbruch haben so dass der Text flüssig d...
25.09.2008 10:26:00
Thread-ID: 1012249
2 Beiträge
erzwungener zeilenumbruch in Zelle
Lars

Hallo,
obwohl ich schon viel mit Excel gemacht habe, tauchen doch immer wieder Fragen auf:
Gibt es eine Möglichkeit, in einer Zelle einen Zeilenumbruch manuell einzufügen, ohne dass man bereits am Zellenende ist?
Ich denke, dass ist eine eher dumme Frage, aber ich habe derzeit keine...
02.10.2008 15:40:00
Thread-ID: 1013906
4 Beiträge
Zeilenumbruch in TextBox
Thomas

Hallo Forum,
hab da mal ne Frage:
Ich hab in einer User Form eine Textbox... ist es möglich diese Textbox mit einem Zeilenumbruch zu versehen? Und wenn ja, wie?
Schon mal Danke im voraus
Thomas
22.10.2008 16:54:11
Thread-ID: 1018407
3 Beiträge
Zeilenumbruch in TextBox
Thomas

Hallo Forum,
hab da mal ne Frage:
Ich hab in einer User Form eine Textbox... ist es möglich diese Textbox mit einem Zeilenumbruch zu versehen? Und wenn ja, wie?
Schon mal Danke im voraus
Thomas
22.10.2008 16:54:19
Thread-ID: 1018408
3 Beiträge
Zeilenumbruch in Formel
Jochen

Hallo, kann ich einen Zeilenumbruch in eine Formel berücksichtige.
Das ist meine Formrl:
=WENN(A11"";VERKETTEN(A11;"/";$C$2;" - ";B11;"/";$C$2;
"ZEILENUMBRUCH AN DIESE STELLE";$C$4;". Trommel X von ";F11);"")
Danke im voraus
Jo. Bo.
04.11.2008 13:35:00
Thread-ID: 1021604
3 Beiträge
Zeilenumbruch an bestimmter Stelle
Edwin

Hallo,
die Frage wurde bestimmt schon gestellt, aber ich konnte keinen Eintrag finden.
Ich möchte in einer Zelle nach einem bestimmten Wort den Zeilenumbruch erzwingen.
Die Zelle ist mit Zeilenumbruch soweit schon formatiert, aber der Umbruch findet nicht da statt wo ich will.
M...
11.11.2008 15:09:46
Thread-ID: 1023577
4 Beiträge
Zeilenumbruch bei Formel in VBA Code
Waven

Hallo Zusammen
Ist es irgendwie möglich im VBA Code innerhalb einer Formel einen Zeilenumbruch zu machen?
Als Beispiel:
aus
Range("A1").Formula = "=SUMPRODUCT((B23:B40=1)*(Q23:Q40=1)*(O23:O40))+SUMPRODUCT((B23:B40=1)*(Q23:Q401)*(R23:R40=1)*(O23:O40))"
soll sowas wie
Ran...
25.11.2008 12:08:00
Thread-ID: 1027662
3 Beiträge
Zeilenumbruch nach Datenimport
fix

Hallo zusammen
Ich habe eine Datenbank (Psion) exportiert in ein csv-File und habe dieses nun ins Excel eingelesen. Es funktioniert alles tip top ausser, dass in den Feldern, wo ursprünglich ein Zeilenumbruch bestand, dieser nun weg ist und mit einem Zeichen (ich nehme an ein Steuerzeichen)...
05.12.2008 10:15:29
Thread-ID: 1030382
2 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