2 Mezzi rapidi per unire e stampare più calendari di Outlook nella stessa pagina

Forse hai più calendari in Outlook e ognuno contiene molti elementi. Se vuoi stampare tutti questi calendari in una stessa pagina, puoi leggere questo articolo per imparare 2 semplici metodi.

Outlook ti consente di visualizzare diversi calendari in modalità sovrapposta, in modo tale da poter vedere tutti gli elementi in diversi calendari nella stessa pagina. Tuttavia, non puoi stampare diversi calendari in questa visualizzazione. Guardando questo problema, qui ti presenteremo 2 approcci, che ti consentono di stampare più calendari in una stessa pagina.

Metodo 1: stampa lo screenshot dei calendari sovrapposti

1. Per iniziare, accedi al riquadro Calendario tramite la combinazione di tasti "Ctrl + 2".
2. Quindi, nel pannello di navigazione, seleziona i calendari che desideri stampare.
3. Quindi, fai clic sulle frecce a sinistra nell'intestazione dei calendari per sovrapporli.
4. Ora puoi vedere che tutti gli elementi dei calendari sono stati mostrati nella stessa vista, come nell'immagine seguente.
5. Successivamente, fai clic su "Nuovi elementi" > "Messaggio di posta elettronica" nella scheda "Home".
6. Nella nuova finestra Messaggio, posiziona il cursore nel corpo.
7. Quindi, passa alla scheda "Inserisci" e fai clic su "Screenshot".
8. Quindi, scegli la prima opzione in "Finestre disponibili".
9. Successivamente, i calendari sovrapposti sono stati inseriti nel corpo.
10. Infine, fai clic su "File" > "Stampa" > "Stampa" per stampare questa e-mail.

Metodo 2: stampa calendari uniti nella stessa pagina tramite VBA

1. Inizialmente, premi i tasti "Alt + F11" per accedere all'editor VBA di Outlook.
2. Quindi, inserisci il seguente codice in un modulo.

Dim objTempCalendar As Outlook.Folder

Sub CombineMultipleCalendars()
    Dim lCalendarCount As Long
    Dim i As Long
 
    On Error Resume Next
    Set objTempCalendar = Application.Session.GetDefaultFolder(olFolderCalendar).Folders("Temp")
    If objTempCalendar Is Nothing Then
       Set objTempCalendar = Application.Session.GetDefaultFolder(olFolderCalendar).Folders.Add("Temp")
    End If

    lCalendarCount = InputBox("How many calendars you want to print?", , "3")
 
    i = 1
    While i <= lCalendarCount
          Call CopyCalendarItems
          i = i + 1
    Wend
End Sub

Sub CopyCalendarItems()
    Dim objSourceCalendar As Outlook.Folder
    Dim objCalendarItem As Outlook.AppointmentItem
    Dim objCopiedItem As Outlook.AppointmentItem
    Dim objMoviedItem As Outlook.AppointmentItem
 
    Set objSourceCalendar = Outlook.Application.Session.PickFolder
 
    If Not (objSourceCalendar Is Nothing) Then
       If objSourceCalendar.DefaultItemType = olAppointmentItem Then
          For Each objCalendarItem In objSourceCalendar.Items
              Set objCopiedItem = objCalendarItem.Copy
              Set objMoviedItem = objCopiedItem.Move(objTempCalendar)
              objMoviedItem.Save
          Next
       End If
    End If
End Sub

3. Quindi, esegui la macro premendo il tasto "F5" nella subroutine "Combina più calendari".
4. Successivamente, inserisci il numero di calendari che desideri stampare contemporaneamente.
5. Successivamente, in base al numero appena inserito, dovrai selezionare un determinato numero di calendari nella finestra di dialogo popup.
6. Al termine della macro, puoi tornare al riquadro di navigazione del Calendario.
7. Ora vedrai un nuovo calendario "Temporaneo" laggiù, che contiene tutti gli elementi dei calendari selezionati.
8. Alla fine, puoi stampare questo calendario come al solito.

Ripara rapidamente i problemi di Outlook

Hai mai riscontrato problemi con Outlook? In tal caso, cosa faresti? In genere, la prima cosa che farebbe la maggior parte degli utenti sarebbe ricorrere allo strumento di riparazione integrato, Scanpst. Tuttavia, in realtà, non è in grado di risolvere i problemi più gravi, come i file PST danneggiati. Normalmente, a quel punto, è necessario ricorrere a uno strumento esterno più esperto, ad esempio DataNumen Outlook Repair. Si può riparare Outlook problemi in un batter d'occhio.

Introduzione dell'autore:

Shirley Zhang è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui correzione sql e prodotti software di riparazione di Outlook. Per maggiori informazioni visita www.datanumen.com