Suggerimento: le altre lingue sono tradotte da Google. Puoi visitare il English versione di questo link.
Log In
x
or
x
x
Registrati
x

or

Come convertire più appuntamenti in attività rapidamente in Outlook?

In questo articolo, parlerò di come convertire un appuntamento o più appuntamenti in modo rapido e semplice in Outlook.

Converti un appuntamento in un'attività trascinandolo e rilasciandolo

Converti più appuntamenti in attività applicando il codice VBA


Converti un appuntamento in un'attività trascinandolo e rilasciandolo

Per convertire un appuntamento in un'attività, devi solo trascinare l'appuntamento nella cartella delle attività, per favore fai come segue:

1. Nel Calendario finestra, selezionare l'elemento dell'appuntamento che è necessario convertire in attività e quindi trascinarlo e rilasciarlo Relazioni dei task icona nella parte inferiore del pannello di navigazione come mostrato nella seguente schermata:

appuntamento con un doc per eseguire 1

2. Quindi un nuovo Task viene visualizzata la finestra, fare clic Salva e chiudi pulsante per salvare questo appuntamento come compito. Vedi screenshot:

appuntamento con un doc per eseguire 2


Converti più appuntamenti in attività applicando il codice VBA

Se hai bisogno di convertire più appuntamenti in attività, il codice VBA sottostante può farti un favore, per favore fai come segue:

1. Tenere premuto il tasto ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. E poi, clicca inserire > Modulo, copia e incolla sotto il codice nel modulo vuoto aperto, vedi screenshot:

Codice VBA: converti più appuntamenti in attività

Sub ConvertAppointmentsToTasks()
Dim xItemCollection As VBA.Collection
Dim xActiveWindow As Object
Dim xItem As Object
Dim xSelection As Outlook.Selection
Dim xTaskFolder As Outlook.Folder
Dim xAppointmentItem As Outlook.AppointmentItem
Dim xTaskItem As Outlook.TaskItem
On Error Resume Next
Set xItemCollection = New VBA.Collection
Set xActiveWindow = Outlook.Application.ActiveWindow
If TypeOf xActiveWindow Is Inspector Then
    Set xItem = xActiveWindow.CurrentItem
    If xItem.Class = olAppointment Then xItemCollection.Add xItem
Else
    Set xSelection = xActiveWindow.Selection
    If xSelection Is Nothing Then Exit Sub
    For Each xItem In xSelection
        If xItem.Class = olAppointment Then xItemCollection.Add xItem
    Next
End If
Set xTaskFolder = Application.Session.PickFolder
If xTaskFolder Is Nothing Then Exit Sub
For Each xAppointmentItem In xItemCollection
    Set xTaskItem = xTaskFolder.Items.Add(olTaskItem)
    With xTaskItem
        .StartDate = Format(xAppointmentItem.Start, "Short Date")
        .DueDate = Format(xAppointmentItem.End, "Short Date")
        .Subject = xAppointmentItem.Subject & " (From Appt)"
        .Categories = xAppointmentItem.Categories
        .Body = xAppointmentItem.Body
        .Save
        .Display
    End With
Next
End Sub

appuntamento con un doc per eseguire 3

3. Quindi selezionare gli appuntamenti che si desidera convertire in attività, quindi fare clic su Esegui macro pulsante per eseguire questo codice, vedi screenshot:

appuntamento con un doc per eseguire 4

4. E poi a Seleziona cartella verrà visualizzata la finestra di dialogo, selezionare a Relazioni dei task cartella in cui si desidera salvare i risultati convertiti, vedere screenshot:

appuntamento con un doc per eseguire 5

5. Quindi fare clic OK pulsante, e tutti gli appuntamenti selezionati verranno creati come attività, quindi dovresti salvare e chiudere il Task finestra una per una, vedi screenshot:

appuntamento con un doc per eseguire 6

6. Quindi, puoi andare al Task cartella, tutti gli appuntamenti selezionati sono stati salvati come nuove attività, vedi screenshot:

appuntamento con un doc per eseguire 7



Kutools for Outlook

Più di 100 Funzioni avanzate per Outlook 2010, 2013, 2016, 2019 e 365

screen shot kutools per outlook minuscolo per banner 201812

Altre caratteristiche | Scarica gratis | Solo $ 39.00 per centinaia di funzioni

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.