Imprimir uma lista de um compromisso recorrente do Outlook com exportação

Imprimir uma lista de um compromisso recorrente do Outlook com o VBA

Na verdade, não há uma maneira direta de imprimir a lista de todas as ocorrências em um compromisso recorrente no Outlook. No entanto, você pode exportar os dados do calendário para o Excel, filtrar todas as ocorrências do compromisso recorrente e imprimir. Faça o seguinte:

1. No Outlook, clique em Envie o > Abrir e exportar (ou Abra)> Import / Export (ou importação).

2. No Assistente de Importação e Exportação, clique no botão Exportar para um arquivo opção, e clique no botão Próximo botão.

3. Na primeira caixa de diálogo Exportar para um arquivo, clique no botão Comma Separated Values opção, e clique no botão Próximo botão.

4. Na segunda caixa de diálogo Exportar para um Arquivo, selecione o calendário que contém o compromisso recorrente que você imprimirá e clique no Próximo botão.

5. Na terceira caixa de diálogo Exportar para um Arquivo, clique no botão Procurar botão.

6. Agora a caixa de diálogo Browse aparece. Por favor (1) especifique uma pasta de destino na qual você salvará o arquivo CSV exportado, (2) nomeie o arquivo CSV no Nome do arquivo caixa, e (3) clique no OK botão.

7. Clique na Próximo botões e Acabamento na terceira e na última caixa de diálogo Exportar um Arquivo.

8. Especifique o intervalo de datas em que você exportará o calendário na caixa de diálogo Definir intervalo de datas e clique no botão OK botão.

9. Até agora, o calendário do Outlook foi exportado como um arquivo CSV. Abra a pasta que contém o arquivo CSV, clique com o botão direito no arquivo CSV e selecione Abrir com > Excel no menu de contexto. Veja a imagem:

10. O arquivo CSV exportado está abrindo no Excel. Selecione o cabeçalho da coluna Assunto e clique Data > filtros. Veja a imagem:

10. Clique no ícone Filtro no cabeçalho da coluna de Assunto, marque apenas o assunto do compromisso recorrente que você imprimirá na lista suspensa e clique no botão OK botão.

11. Apenas as ocorrências do compromisso recorrente especificado são filtradas. Por favor clique Envie o > Impressão para imprimi-los.

Este método apresentará um VBA para imprimir rapidamente uma lista de um compromisso recorrente no Outlook à vontade. Faça o seguinte:

1. Na visualização do Calendário, selecione uma ocorrência do compromisso recorrente que você imprimirá e pressione outro + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique inserção > Móduloe, em seguida, cole o código VBA abaixo no novo script de módulo de abertura.

VBA: Imprimir uma lista de todas as ocorrências em um compromisso recorrente no Outlook

Sub RecurringList()

Dim CalendarFolder As Outlook.MAPIFolder
Dim CalendarItems As Outlook.Items
Dim RestrictItems As Outlook.Items
Dim sFilter, sSubject, sOccur As String
Dim iNumRestricted As Integer
Dim itm, itmNew As Object
Dim tStart, tEnd As Date

Set CalendarFolder = Application.ActiveExplorer.CurrentFolder
Set CalendarItems = CalendarFolder.Items

   CalendarItems.Sort "[Start]"
CalendarItems.IncludeRecurrences = True

    tEnd = Format(Now + 10, "Short Date")

sSubject = Application.ActiveExplorer.Selection.Item(1).Subject

   sFilter = "[Start] >= '11/1/2016' And [End] < '6/30/2017' And  [IsRecurring]  = True And [Subject] = " & sSubject

   Set RestrictItems = CalendarItems.Restrict(sFilter)

   iNumRestricted = 0

   For Each itm In RestrictItems
iNumRestricted = iNumRestricted + 1
sOccur = sOccur & vbCrLf & itm.Subject & vbTab & " >> " & vbTab & itm.Start & vbTab & " to: " & vbTab & itm.End
Next

Set itmNew = Application.CreateItem(olMailItem)
itmNew.Body = sOccur & vbCrLf & iNumRestricted & " occurrences found."
itmNew.Display

End Sub

Note: Altere o intervalo de datas em que imprimirá o compromisso recorrente no código: sFilter = "[Iniciar]> = '11/1/2016'E [Fim] <'6/30/2017 ' And [IsRecurring] = True And [Subject] = "& strSubject

3. Pressione F5 ou clique no Execute botão para executar este VBA.

4. Agora, a lista de todas as ocorrências no compromisso recorrente selecionado é copiada e colada em um novo e-mail, conforme a imagem mostrada abaixo. Por favor clique Envie o > Impressão para imprimir a lista.

Imprimir calendário em branco (sem compromisso) no Outlook

Imprima duas semanas / meses de calendário por página no Outlook

Imprimir calendário diário no Outlook