Propriedade RecurrencePattern.Interval (Outlook)
Retorna ou define um valor Long especificando o número de unidades de um determinado tipo de recorrência entre ocorrências. Leitura/gravação.
Sintaxe
expression. Interval
Expressão Uma variável que representa um objeto RecurrencePattern .
Comentários
A propriedade do intervalo deve ser definida antes de PatternEndDate.
Por exemplo, a definição da propriedade Interval como 2 e a propriedade RecurrenceType como olRecursWeekly causaria o padrão ocorra a cada duas semanas.
Quando RecurrenceType estiver definido como olRecursYearNth ou olRecursYear, a propriedade Interval indica o número de anos entre ocorrências. Por exemplo, o intervalo for igual a 1 indica a recorrência é a cada ano, o intervalo igual 2 indica a recorrência é a cada 2 anos e assim por diante.
Exemplo
Este exemplo Visual Basic for Applications usa GetRecurrencePattern para obter o objeto RecurrencePattern recém-criado AppointmentItem. As propriedades, RecurrenceType, DayOfWeekMask, PatternStartDate, intervalo, PatternEndDate e assunto são definidas, o compromisso é salvo e exibido com o padrão: "ocorre a cada 3 semana (s) na segunda-feira efetivo 1/21/2003 até 12/21/2004 das 2:00 às 17:00."
Sub CreateAppointment()
Dim myApptItem As AppointmentItem
Dim myRecurrPatt As RecurrencePattern
Set myApptItem = Application.CreateItem(olAppointmentItem)
Set myRecurrPatt = myApptItem.GetRecurrencePattern
myRecurrPatt.RecurrenceType = olRecursWeekly
myRecurrPatt.DayOfWeekMask = olMonday
myRecurrPatt.PatternStartDate = #1/21/2003 2:00:00 PM#
myRecurrPatt.Interval = 3
myRecurrPatt.PatternEndDate = #12/21/2004 5:00:00 PM#
myApptItem.Subject = "Important Appointment"
myApptItem.Save
myApptItem.Display
Set myOlApp = Nothing
Set myApptItem = Nothing
Set myRecurrPatt = Nothing
End Sub
Confira também
Como: criar um compromisso como reunião no calendário
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.