Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
944to948
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
944to948
944to948
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilenumbruch in MsgBox

Zeilenumbruch in MsgBox
29.01.2008 22:08:00
Jürgen
Hallo zusammen,
ich habe Problem mit einer MsgBox. Ich habe einen sehr langen Text, der in einer MsgBox erscheint. Ich hätte diesen Text gern in mehrere Absätze unterteilt. Kann ich in einer MsgBox Zeilenumbrüche einfügen?
Im Voraus vielen Dank!
Jürgen

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenumbruch in MsgBox
29.01.2008 22:11:06
Uduuh
Hallo,
msgbox "Text1" &vblf &"text2" 'etc.
Gruß aus’m Pott
Udo

AW: Zeilenumbruch in MsgBox
29.01.2008 22:11:00
chris
Ja kannst du.
Ungetestet
msgbox("Hallo zeile 1" & chr(10) & " Hallo zeile zwei")
gruß Chris

AW: Zeilenumbruch in MsgBox
29.01.2008 22:26:06
Jürgen
Super!!!
Vielen Dank für die schnelle Lösung!!!
Grüße aus der Banken-Metropole
Jürgen

AW: Zeilenumbruch in MsgBox
31.01.2008 22:50:00
Jürgen
Leider ist das Problem für mich doch noch nicht ganz behogen...
Wie bereits beschrieben soll in die MsgBox ein wirklich langer Text.
Ich nutze dafür folgenden Sub:

Sub RG_SZ()
Dim Mldg, Stil, Titel, Antwort
Mldg = "(1) Für Beiträge und Beit..."                     'MsgBox Text
Stil = vbOKOnly                                                     'MsgBox Schaltflächen
Titel = "Hinweis"                                                   'MsgBox Titel
Antwort = MsgBox(Mldg, Stil, Titel)


Weil der Mldg-Text jetzt allerdings soo extrem lang geworden ist, passt er in VBA nicht mehr in eine Zeile. Einen Zeilenumbruch in der MsgBox erzeuge ich an den nötigen Stellen mit "& vbLf & " im Text. Meine Frage ist nun, wie ich in VBA einen Zeilenumbruch hinbekommen, damit ich nicht den ganzen Text in eine Zeile schreiben muss, wo er ja mittlerweile auch nicht mehr rein passt.
Bin um jede Hilfe dankbar.
Beste Grüße
Jürgen

Anzeige
AW: Zeilenumbruch in MsgBox
31.01.2008 23:16:00
Josef
Hallo Jürgen,
einen Zeilenumbruch im VBE erzeugst du so.
Mldg = "blabla blablabla" & _
    "blabla bla blabla" & _
    "blablabla."

Bei langen Texten ist es jedoch sinnvoller und praktischer weil leichter zu pflegen, diese in einer externen Textdatei zu hinterlegen und einzulesen.
Sub RG_SZ()
Dim Mldg As String, Stil As Long, Titel As String, Antwort As Integer

Mldg = TextReadAll("F:\Office\test.txt") 'MsgBox Text
Stil = vbOKOnly 'MsgBox Schaltflächen
Titel = "Hinweis" 'MsgBox Titel
Antwort = MsgBox(Mldg, Stil, Titel)

End Sub

Private Function TextReadAll(ByVal strFile As String) As String
Dim fF As Integer
Dim strText As String

If Dir(strFile) <> "" Then
    
    fF = FreeFile
    Open strFile For Binary As #fF
    strText = Space$(LOF(fF))
    Get #fF, , strText
    Close #fF
    
    TextReadAll = strText
Else
    TextReadAll = "File Not Found!"
End If
End Function

Zu beachten ist bei einer MsgBox noch, das die, je nach Systemschrift, nur ca. 1024 Zeichen dargestellt werden können.

Gruß Sepp



Anzeige
AW: Zeilenumbruch in MsgBox
31.01.2008 23:49:00
Jürgen
Schön wär's gewesen...
Mein Text umfasst leider mehr als 1024 Zeichen, weshalb der Text einfach "abgeschnitten" wird. Gibt's vielleicht eine andere Möglichkeit in Excel, durch den Klick auf eine selbst erzeugte Schalftläche einen selbst erzeugten Hinweistext in einem separaten Fenster anzuzeigen?

AW: Zeilenumbruch in MsgBox
01.02.2008 00:13:41
Jürgen
hallo Sepp,
vielen, vielen Dank! Mir scheint, dass ist die optimale Lösung!!!
Beste Grüße aus der Rhein-Main-Metropole
Jürgen
Anzeige

110 Forumthreads zu ähnlichen Themen

Zeilenumbruch in MsgBox?
Volker Croll
Hallo Daniel,eine der Moeglichkeiten ist"Sollen hier ein" & Chr(10) _
"Zeilenumbruch erfolgen ?"Gruss Volker
16.04.2002 11:06:35
Thread-ID: 113650
4 Beiträge
Anzeige
VBA - Zeilenumbruch in Zelle entfernen
Jörg

Hallo Forum,
bei der Übergabe von xlsx an csv wird bei einer mehrzeiligen (Alt+Enter) Zelle ein CR übergeben, der zwischen den Trennzeichen (;) steht und bei der Übergabe an das Walldorf-System einen neuen Datensatz erzwingt.
;;;;;;;;;
"Text2 Z1
Text2Z2";"Text3 Z1
Text3 Z...
20.04.2012 14:25:48
Thread-ID: 1260269
3 Beiträge
mit VBA einen Zeilenumbruch einfügen
WalterK

Hallo,
Per Schaltfläche möchte ich ein Makro starten, das in jeder beschriebenen Zelle am Ende des Zellinhaltes zusätzlich noch einen Zeilenumbruch einfügt, außer es ist am Ende des Zellinhaltes bereits einer vorhanden.
Es soll im Bereich D5:D&bis zur letzten belegten Zelle funktio...
26.06.2012 10:42:03
Thread-ID: 1268821
3 Beiträge
Anzeige
Tabelle in VBA erweitern (neue Zeile am Ende)
Rainer

Hallo,
ich möchte eine Tabelle in mehreren Schritten so füllen, dass in jedem Schritt jeweils hinter der letzten bereits gefüllten Zeile weitergemacht wird. Solange keine Zeilen gelöscht werden, klappt das mit UsedRange ganz gut, aber sobald Zeilen gelöscht werden liefert UsedRange immer no...
16.01.2014 14:41:00
Thread-ID: 1345480
2 Beiträge
Code übernimmt Zeilenumbruch nicht beim kopieren
rieckmann

Hallo allerseits,
ich habe hier einen Code der hier im Forum kreiert wurde.
er funktioniert so weit ganz gut, nur dass er beim kopieren das Format Zeilenumbruch
nicht mit kopiert.
Funktion des Code ist alle markierten Zeilen in das Tabellenblatt "Auswahlliste" zu kopieren.
I...
11.02.2014 18:50:02
Thread-ID: 1349153
5 Beiträge
Mehrspaltig in Textbox und Enter für neue Zeile
Vulferin

Hallo Zusammen
Ich habe ene Textbox
Wenn ich einen Text reinkopieren kann ich diesen durch neue Zeilen Gliedern z.B
1. Lila Bogen
2. Roter Bogen.
3 Gelber Bogen
Wenn ich das aber alles per Handschreibe geht das nur so
1. Lila Bogen 2. Roter Bogen 3. Gelber Bogen
...
21.09.2014 07:10:31
Thread-ID: 1382708
2 Beiträge
VBA Dynamische Tabelle neue Zeile generieren
Spenski

Hallo
Ich habe eine Dynamische Tabelle "Tabelle1"
Ich möchte, das per Button die Tabelle um eine Zeile erweitert wird. geht sowas?
danke fürs lesen
christian
18.05.2015 20:31:20
Thread-ID: 1426692
3 Beiträge
VBA - Messagebox - Eingabeformular
Neo

Hallo zusammen,
ich bin gestern in die Tiefen der VBA (mittels Youtube u. Google) erstmals eingestiegen, um die Produktionsdatenerfassung über ein Eingabeformular zu standardisieren.
Soweit prima, nun möchte ich jedoch noch die Fehleranfälligkeit reduzieren.
(hierzu siehe mein Einga...
14.08.2015 13:59:04
Thread-ID: 1442348
3 Beiträge
Anzeige

Links zu Excel-Dialogen

UserForm

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
3
2
2
2
4
1
4
1
2
2
19
2
4
7
7
4
4
1
1
3
7
22
1
2
1