Módulo
Conteúdo
Índice 🔎︎

# Função WeekDay

Retorna o número correspondente ao dia da semana representado por um número data serial gerado pela função DateSerial ou pela função DateValue.

## Sintaxe:

    WeekDay (Number)

## Valor de retorno:

Integer

## Parâmetros:

Number: expressão de número inteiro que contém o número de data em série usado para calcular o dia da semana (1-7).

O exemplo a seguir determina o dia da semana, usando a função WeekDay quando você digita uma data.

## Códigos de erro:

5 Chamada de procedimento inválida

## Exemplo:

    Sub ExampleWeekDay

    Dim sDay As String

    ' Retornar e exibir o dia da semana

        Select Case WeekDay( Now )

            Case 1

                sDay="Domingo"

            Case 2

                sDay="Segunda-feira"

            Case 3

                sDay="Terça-feira"

            Case 4

                sDay="Quarta-feira"

            Case 5

                sDay="Quinta-feira"

            Case 6

                sDay="Sexta-feira"

            Case 7

                sDay="Sábado"

        End Select

        MsgBox "" + sDay,64,"Hoje é"

    End Sub