Kategorien

Artikel-Schlagworte: „MessageBox“

Message-Box – Ausgabe von Zellinhalten einer Tabelle

Der nachfolgende Code gibt bei Ausführung des Makros eine Messagebox aus
In der Messagebox erscheint der Inhalt aus dem Registerblatt "TestA" aus den Zellen "A1" bis "B3"
Die einzelnen Zeilen (1,2,3) sind jeweils in seperaten Zeilen ausgewiesen
Zwischen den Spalten gibt es einen Tab-Abstand
MsgBox _
Sheets("TestA").Range("A1") & vbTab & Sheets("TestA").Range("B1") & vbCrLf & Sheets("TestA").Range("A2") & vbTab & Sheets("TestA").Range("B2") & vbCrLf & Sheets("TestA").Range("A3") & vbTab & Sheets("TestA").Range("B3")


Mehrzeilige Texte in MessageBox anzeigen

Nachfolgender Code gibt eine MessageBox aus, welche in der ersten Zeile "Hallo", in der zweiten Zeile "mein Name ist:" und in der dritten Zeile "Tamara" ausgibt.
Sub MessageBox1()
    MsgBox "Hallo" & vbCrLf & "mein Name ist:" & vbCrLf & vbCrLf & "Tamara"
End Sub


& vbCrLf & bewirkt hierbei den Wechsel in die nächste Zeile, diesen Befehl mehrfach hintereinander geschaltet, ergibt entsprechend häufige Zeilenwechsel und demzufolge bei einer zweifach-Schaltung eine Leerzeile.