Obsah
Index 🔎︎

# Funkce WeekDay

Vrátí hodnotu určující den v týdnu odpovídající datu v číselné podobě (vytvořenému funkcí DateSerial nebo DateValue).

## Syntaxe:

    WeekDay (Number)

## Návratová hodnota:

Celé číslo

## Parametry:

Number: Číselný výraz, který obsahuje datum v číselné podobě, ze kterého se určí den v týdnu (1-7).

Následující příklad určí po zadání data den v týdnu s použitím funkce WeekDay.

## Chybové kódy:

5 Neplatné volání procedury

## Příklad:

    Sub ExampleWeekDay
    Dim sDay As String
    ' Vrátí a zobrazí den v týdnu
        Select Case WeekDay( Now )
            Case 1
                sDay="Neděle"
            Case 2
                sDay="Pondělí"
            Case 3
                sDay="Úterý"
            Case 4
                sDay="Středa"
            Case 5
                sDay="Čtvrtek"
            Case 6
                sDay="Pátek"
            Case 7
                sDay="Sobota"
        End Select
        MsgBox "" + sDay,64,"Dnes je "
    End Sub