Módulo
Conteúdo
Índice 🔎︎

# Função WeekDay

Devolve o número correspondente ao dia da semana representado por um número de data em série gerado pela função DateSerial ou DateValue.

## Sintaxe:

    WeekDay (Número)

## Valor de retorno:

Número inteiro

## Parâmetros:

Número: expressão de números inteiros que contém o número de data em série utilizado para calcular o dia da semana (1-7).

O exemplo que se segue determina o dia da semana utilizando a função WeekDay quando se introduz uma data.

## Códigos de erro

5 Chamada de procedimento inválido

## Exemplo:

    Sub ExampleWeekDay

    Dim sDay As String

    ' Obter e devolver 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