Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
Screenshot zu MsgBox	MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Syntax | Herbers Excel-Forum

• Syntax von Beat Rölli vom 30.01.2010 19:46:42
• AW: Syntax - von Hajo_Zi am 30.01.2010 19:52:22
  • AW: Syntax - von mumpel am 30.01.2010 19:57:43
  • AW: Syntax - von Beat am 30.01.2010 20:17:42
• probiers mal so - von Matthias L am 30.01.2010 19:57:57

Betrifft: Syntax von: Beat Rölli
Geschrieben am: 30.01.2010 19:46:42

Guten Tag

weiss jemand was an dieser Syntax falsch ist in der Excel Version 2007. Im 2003 liefs noch.

Sub MehrzeiligeMeldungausgeben()

MsgBox "Der angemeldete Anwender heisst: " & _
Environ("username") & vbLf & _
"Heute ist" & Format(Date, "DDDD", ""der"" DD.MM.YYYY") & vbLf &_
"Aktuelle Uhrzeit: " & Time & " Uhr", vbInformation, _
"Aktuelle Ansage"

End Sub

Gruss

Betrifft: AW: Syntax von: Hajo_Zi
Geschrieben am: 30.01.2010 19:52:22

Hallo Beat,

ich kann mir nicht vorstellen das dies unter 2003 lief zum testen unter 2003 ist mir das zu aufwendig. Unter 2010 läuft folgender Code

Option Explicit

Sub MehrzeiligeMeldungausgeben()
    MsgBox "Der angemeldete Anwender heisst: " & _
    Environ("username") & vbLf & _
    "Heute ist " & Format(Date, "DDDD") & " der " & Format(Date, "DD.MM.YYYY") & vbLf & _
    "Aktuelle Uhrzeit: " & Time & " Uhr", vbInformation, _
    "Aktuelle Ansage"
End Sub

Betrifft: AW: Syntax von: mumpel
Geschrieben am: 30.01.2010 19:57:43

Hallo!

Ein wenig feiner:

Sub MehrzeiligeMeldungausgeben()

MsgBox "Der angemeldete Anwender heisst: " & _
Environ("username") & vbCrLf & _
"Heute ist " & Format(Date, "DDDD") & " der " & Format(Date, "DD.MM.YYYY") & vbCrLf & _
"Aktuelle Uhrzeit: " & Format(Now, "hh:mm") & " Uhr", 64, "Aktuelle Ansage"

End Sub

Code eingefügt mit VBA in HTML 2.0

Gruß, René

Betrifft: AW: Syntax von: Beat
Geschrieben am: 30.01.2010 20:17:42

ok, Danke. Nun läufts

Betrifft: probiers mal so von: Matthias L
Geschrieben am: 30.01.2010 19:57:57

Hallo

Sub MehrzeiligeMeldungausgeben()
MsgBox "Der angemeldete Anwender heisst: " & Environ("username") & vbLf & "Heute ist " & Format( _
Date, "DDDD") & " der " & Format(Date, "DD/MM/YYYY") & vbLf & "Aktuelle Uhrzeit: " & Time & " Uhr", vbInformation, "Aktuelle Ansage"
End Sub

Gruß Matthias