Modul
Indhold
Indholdsfortegnelse 🔎︎

# WeekDay-funktion

Returnerer tallet svarende til ugedagen repræsenteret ved et serielt datotal, som genereres af DateSerial- eller DateValue-funktionen.

## Syntaks:

    WeekDay (Number)

## Returværdi:

Integer

## Parametre:

Number: Heltalsudtryk, som indeholder det serielle datotal, som bruges til at beregne ugedagen (1-7). Dag 1 er søndag.

Følgende eksempel bestemmer ugedagen ved brug af funktionen WeekDay når du indtaster en dato.

## Fejlkoder:

5 Ugyldigt Procedurekald

## Eksempel:

    Sub ExampleWeekDay

    Dim sDay As String

    REM Returner og vis ugedagen

        Select Case WeekDay( Now )

            Case 1

                sDay="Søndag"

            Case 2

                sDay="Mandag"

            Case 3

                sDay="Tirsdag"

            Case 4

                sDay="Onsdag"

            Case 5

                sDay="Torsdag"

            Case 6

                sDay="Fredag"

            Case 7

                sDay="Lørdag"

        End Select

        Msgbox "" + sDay,64,"I dag er det"

    End Sub