Mostrar tudo

Ocultar tudo

Devolve uma Variante (Número inteiro) que contém a parte especificada de uma determinada data.

Sintaxe

PartData(intervalo, data [, primeirodiadasemana] [, primeirasemanadoano] )

A sintaxe da função PartData tem os seguintes argumentos (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.):

Definições

O argumento (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.) intervalo tem as seguintes definições:

O argumento primeirodiadasemana tem as seguintes definições:

O argumento primeirasemanadoano tem as seguintes definições:

Observações

Pode utilizar a função PartData para avaliar uma data e devolver um intervalo de tempo específico. Por exemplo, poderá utilizar PartData para calcular o dia da semana ou a hora actual.

O argumento primeirodiadasemana afecta os cálculos que utilizam os símbolos de intervalo "w" e "ww".

Se a data for um literal de data (literal de data: qualquer sequência de caracteres com um formato válido com o sinal cardinal (#) no princípio e no fim. Os formatos válidos incluem o formato de data especificado pelas definições regionais de código ou o formato de data universal.), o ano especificado torna-se parte permanente dessa data. No entanto, se a data estiver entre aspas (" ") e omitir o ano, é inserido o ano actual no código sempre que a expressão data for avaliada. Desta forma, é possível escrever o código para que possa ser utilizado em anos diferentes.

 Nota   Em data, se a definição da propriedade do Calendário for Gregoriano, a data fornecida tem de ser Gregoriana. Se o calendário for Hijri, a data fornecida tem de ser Hijri.

A parte da data devolvida encontra-se nas unidades de período de tempo do calendário Árabe. Por exemplo, se o calendário actual for Hijri e a parte da data a devolver for o ano, o respectivo valor é um ano Hijri.

Exemplo

 Nota   Os exemplos que se seguem demonstram a utilização desta função num módulo do Visual Basic for Applications (VBA). Para mais informações sobre como trabalhar com VBA, seleccione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de procura.

Este exemplo utiliza uma data e a função PartData apresenta o trimestre do ano em que ocorre.

Dim TheDate As Date    ' Declare variables.
Dim Msg    
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg