Module
Contents
Index 🔎︎

# WeekDay Function

Vrača broj koji korespondira danu u sedmici predstavljenog kao serijski datum koji je generisan od strane DateSerial ili DateValue funkcije.

## Sintaksa:

    Dan (broj)

## Vrati vrijednost:

Cjelobrojno

## Parametri:

Number: Integer izraz koji sadrži serijski datum koji se koristi da se iskalkuliše dan u sedmici (1-7).

Slijedeći primjer određuje dan u sedmici koristeći WeekDay funkciju kada unesete datum.

## Error codes:

5 Invalid procedure call

## Primjer:

    Sub ExampleWeekDay

    Dim sDay As String

    REM Vrati i prikaži dan u sedmici

        Select Case WeekDay( Now )

            Case 1

                sDay="Nedjelja"

            Case 2

                sDay="Ponedjeljak"

            Case 3

                sDay="Utorak"

            Case 4

                sDay="Srijeda"

            Case 5

                sDay="Četvrtak"

            Case 6

                sDay="Petak"

            Case 7

                sDay="Subota"

        End Select

        msgbox "" + sDay,64,"Danas je"

    End Sub