Format Wochentag

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
TextBox MsgBox


Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Format Wochentag
von: Michael
Geschrieben am: 04.07.2002 - 10:33:58

Hallo,

mit diesem Code lasse ich mir den Wochentag eines Datums anzeigen:

Eingabe.TextBox1.Value = WeekDay(txtDat)

Der Rückgabewert ist richtig, z.B 5.

Mit welchem Code kriege ich jetzt die Formatierung für
"Donnerstag"? Ich komme einfach nicht drauf.

Kann mir jemand helfen?

Vielen Dank vorab

Michael

nach oben   nach unten

Re: Format Wochentag
von: Hajo_Zi
Geschrieben am: 04.07.2002 - 10:44:58

Hallo Michael

in dieser Art


Sub test()
    Dim Tag As Date
    Dim Wochentag
    Tag = "04.07.02"
    Wochentag = Format(Weekday(Tag), "dddd")
End Sub

Gruß Hajo


nach oben   nach unten

Re: Format Wochentag
von: Andreas
Geschrieben am: 04.07.2002 - 10:45:03

Hallo Michael,

dieses kleine Beispiel zeigt eine Möglichkeit:

Sub Beispiel()
MsgBox WorksheetFunction.Choose(Weekday(Now), "Sonntag", _
    "Montag", "Dienstag", "Mittwoch", "Donnerstag", "Freitag", "Samstag")
End Sub

Viel Spaß,
Andreas
nach oben   nach unten

Re: Format Wochentag
von: Andreas
Geschrieben am: 04.07.2002 - 10:46:30

ich wußte doch es geht einfacher :-)
nach oben   nach unten

Re: Format Wochentag
von: sam
Geschrieben am: 04.07.2002 - 10:53:48

Hi,

um ganz genau zu sein, kann man Hajos Lösung noch verbessern, da man auf die Weekday-Funktion verzichten kann.

Aber das ist schon fast Haarspalterei... ;-)


Wochentag = Format(Tag, "dddd")

nach oben   nach unten

Re: Format Wochentag
von: Andreas
Geschrieben am: 04.07.2002 - 10:59:04

Wenn man das so betrachtet, dann ist es ja schon seltsam, dass mit Format(Weekday(...), "dddd") das richtige herauskommt...

Einziger Vorteil es mit Choose zu machen, liegt darin, dass man eigene Bezeichnungen (z.B. bei irgendwelchen Dialekte *g*) zuordnen kann.

Andreas


nach oben   nach unten

Re: Format Wochentag
von: Michael
Geschrieben am: 04.07.2002 - 11:26:40

Vielen Dank an alle

Gruß Michael


nach oben   nach unten

Re: Format Wochentag
von: Michael
Geschrieben am: 04.07.2002 - 11:26:51

Vielen Dank an alle

Gruß Michael


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Format Wochentag"