Método Application.OptionsCalendar (Project)

Define opções para o calendário do projeto ativo.

Sintaxe

expression. OptionsCalendar( _StartWeekOnMonday_, _StartYearIn_, _StartTime_, _FinishTime_, _HoursPerDay_, _HoursPerWeek_, _SetDefaults_, _StartWeekOn_, _UseFYStartYear_, _DaysPerMonth_ )

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
StartWeekOnMonday	Opcional	Boolean	True se a semana começa na segunda-feira. False se a semana começa no domingo. Se StartWeekOn for especificado, StartWeekOnMonday será ignorada. (O argumento StartWeekOn é uma melhor maneira de especificar o início da semana.)
StartYearIn	Opcional	Long	O primeiro mês do ano fiscal. Pode ser uma das constantes PjMonth.
StartTime	Opcional	Variant	A hora de início padrão para dias úteis.
FinishTime	Opcional	Variant	A hora de término padrão para dias úteis.
HoursPerDay	Opcional	Double	O número padrão de horas de trabalho por dia.
HoursPerWeek	Opcional	Double	O número padrão de horas de trabalho por semana.
Setdefaults	Opcional	Boolean	True se os valores de StartYearIn, StartTime, FinishTime, HoursPerDay, HoursPerWeek, StartWeekOn e UseFYStartYear forem usados como valores padrão para novos projetos. O valor padrão é False.
StartWeekOn	Opcional	Long	O primeiro dia da semana. Pode ser uma das constantes PjWeekday.
UseFYStartYear	Opcional	Boolean	True se um ano fiscal é determinado pelo ano do primeiro mês do ano fiscal. False se determinado pelo último mês do ano fiscal. Por exemplo, se StartYearIn for pjJuly (para denotar julho de 2012) e UseFYStartYear for True, o ano fiscal que termina em junho de 2012 seria FY2012.
DaysPerMonth	Opcional	Double	O número padrão de dias úteis por mês.

Valor de retorno

Boolean

Comentários

Se um argumento for omitido, o valor padrão será especificado pela definição na guia Agenda da caixa de diálogo Opções do projeto.

Usar o método OptionsCalendar sem especificação de argumentos exibe a caixa de diálogo Opções do projeto com a guia Geral selecionada.

Exemplo

O exemplo a seguir define o primeiro mês do ano fiscal como abril, o número padrão de horas de trabalho por dia como 4 horas e o número padrão de horas de trabalho por semana como 20 horas.

Sub Options_Calendar() 
    Dim HoursDay As Double 
    Dim HoursWeek As Double 
 
    HoursDay = 4 
    HoursWeek = 20 
 
    OptionsCalendar StartYearIn:=pjApril, HoursPerDay:=HoursDay, HoursPerWeek:=HoursWeek 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.