Microsoft Excel

Herbers Excel/VBA-Archiv

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

Syntax | Herbers Excel-Forum


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

GrußformelHomepage


  

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