KutoolsforOffice — Uma solução, cinco ferramentas poderosas.Fazer mais com menos esforço.

Como imprimir uma lista de um compromisso recorrente do Outlook?

AutorKelly Data de Modificação

Como sabe, um compromisso recorrente no Outlook contém várias ocorrências que se repetem regularmente. No entanto, ao imprimi-lo, a lista completa dessas ocorrências desaparece. Como, então, imprimir todas as ocorrências de um compromisso recorrente? As soluções abaixo facilitam esse processo.

Office Tab – Ative a Edição e Navegação com Separadores no Microsoft Office e torne o trabalho numa tarefa fácil
Desbloqueie Kutools para Outlook agora e desfrute de mais de 100 funcionalidades com acesso ilimitado para sempre
Potencie o seu Outlook 2024 - 2010 ou Outlook 365 com estas funcionalidades avançadas. Aproveite as funcionalidades poderosas do 100+ e eleve a sua experiência de e-mail!

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

Na verdade, não há uma forma direta de imprimir a lista de todas as ocorrências de um compromisso recorrente no Outlook. Contudo, pode exportar os dados da sua agenda para o Excel, filtrar todas as ocorrências desse compromisso recorrente e, em seguida, imprimi-las. Siga estes passos:

1. No Outlook, clique em Ficheiro > Abrir e Exportar(ou)Abrir) > Importar/Exportar(ou)Importar).

2. No Assistente de Importação e Exportação, selecione a opção Exportar para um ficheiro e clique no botão Seguinte.

doc-print-recurring-appointment-1

3. Na primeira caixa de diálogo Exportar para um Ficheiro, selecione a opção Valores Separados por Vírgulas e clique no botão Seguinte.

doc-print-recurring-appointment-2

4. Na segunda caixa de diálogo Exportar para um Ficheiro, selecione a agenda que contém o compromisso recorrente que pretende imprimir e clique no botão Seguinte.

doc-print-recurring-appointment-3

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

doc-print-recurring-appointment-10

6. A caixa de diálogo Procurar é agora apresentada. (1) Especifique a pasta de destino onde deseja guardar o ficheiro CSV exportado, (2) introduza um nome para o ficheiro CSV na caixa Nome do Ficheiro e (3) clique no botão OK.

doc-print-recurring-appointment-4

7. Clique nos botões Seguinte e Concluir nas caixas de diálogo terceira e última de Exportar um Ficheiro.

doc-print-recurring-appointment-5

8. Especifique o intervalo de datas para o qual pretende exportar a agenda na caixa de diálogo Definir Intervalo de Datas e clique no botão OK.

doc-print-recurring-appointment-6

9. Neste momento, a agenda do Outlook foi exportada como um ficheiro CSV. Abra a pasta que contém o ficheiro CSV, clique com o botão direito do rato no ficheiro e selecione Abrir com > Excel no menu de contexto. Veja a imagem:

doc-print-recurring-appointment-7

10. O ficheiro CSV exportado está a abrir no Excel. Clique no cabeçalho da coluna Assunto e, em seguida, clique em Dados > Filtrar. Veja a imagem:

doc-print-recurring-appointment-8

10. Clique no ícone de filtro no cabeçalho da coluna Assunto, selecione apenas o assunto do compromisso recorrente que pretende imprimir na lista pendente e clique no botão OK.

doc-print-recurring-appointment-9

11. Apenas as ocorrências do compromisso recorrente especificado são filtradas. Clique em Ficheiro > Imprimir para as imprimir.


Imprimir uma lista de um compromisso recorrente do Outlook com VBA

Este método utiliza um código VBA para imprimir rapidamente e facilmente uma lista de um compromisso recorrente no Outlook. Proceda da seguinte forma:

1. Na vista Calendário, selecione uma ocorrência do compromisso recorrente que pretende imprimir e prima as teclas Alt+F11 para abrir a janela do Microsoft Visual Basic para Aplicações.

2. Clique em Inserir > Módulo e cole o código VBA abaixo no novo módulo aberto.

VBA: Imprimir uma lista de todas as ocorrências de 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

Nota: Altere o Intervalo de Datas dentro do qual pretende imprimir o compromisso recorrente no código: sFilter = "[Start] >= '11/1/2016' And [End] < '6/30/2017'And  [IsRecurring]  = True And [Subject] = " & strSubject

3. Prima a tecla F5 ou clique no botão Executar para executar este VBA.

4. Agora, a lista de todas as ocorrências do compromisso recorrente selecionado foi copiada e colada num novo e-mail, conforme mostrado na imagem seguinte. Clique em Ficheiro > Imprimir para imprimir a lista.

doc-print-recurring-appointment-11


Artigos Relacionados


Melhores Ferramentas de Produtividade para o Office

Experimente o totalmente novo Kutools para Outlook com 100+ funcionalidades incríveis!Clique para transferir já!

🤖KUTOOLS AI:Utiliza tecnologia avançada de IA para gerir e-mails sem esforço, incluindo responder, resumir, otimizar, alongar, traduzir e redigir mensagens.

📧Automação de E-mails: Resposta Automática (disponível para POP e IMAP) / Agendar Envio de E-mails / CC/BCC Automático por Regras ao Enviar E-mail / Encaminhamento Automático (regra avançada) / Adicionar Saudação Automaticamente / Dividir Automaticamente E-mails com Múltiplos Destinatários em Mensagens Individuais...

📨Gestão de E-mails: Recallar e-mail / Bloquear e-mails fraudulentos por assunto e outros critérios / Eliminar e-mails duplicados / Pesquisa avançada / Organizar pastas...

📁Anexos Pro: Guardar em Lote / Desanexar em Lote / Comprimir em Lote / Salvar Automaticamente / Desanexar Automaticamente / Auto Comprimir...

🌟Magia da Interface: 😊 Mais Emojis Bonitos e Divertidos / Avisa-o quando chegam e-mails importantes / Minimizar o Outlook em vez de fechá-lo...

👍Maravilhas com um Clique: Responder a Todos com Anexos / E-mails Anti-Phishing / 🕘 Mostrar Fuso Horário – Hora Atual do Remetente...

👩🏼‍🤝‍👩🏻Contactos e Calendário: Criar contactos em lote a partir de e-mails selecionados / Dividir um grupo de contactos em grupos individuais / Remover lembrete de aniversário...

Utilize o Kutools no seu idioma preferido – com suporte para inglês, espanhol, alemão, francês, chinês e mais de 40 idiomas!

Desbloqueie instantaneamente o Kutools para Outlook com um único clique! Não espere mais — transfira já e aumente a sua eficiência!

kutools for outlook features1kutools for outlook features2

🚀 Transferência com um Clique — Obtenha Todos os Extras do Office

Altamente Recomendado: Kutools for Office (5 em 1)

Um clique para transferir cinco instaladoresde uma só vez —Kutools para Excel, Outlook, Word, PowerPointe Office Tab Pro.Clique para transferir já!

  • Conveniência com um clique: Transfira os cinco pacotes de instalação numa única ação.
  • 🚀Pronto para qualquer tarefa no Office: instale os extras que precisa, exatamente quando os precisar.
  • 🧰Incluídos: Kutools para Excel / Kutools para Outlook / Kutools para Word / Office Tab Pro / Kutools for PowerPoint