Note: The other languages of the website are Google-translated. Back to English

Cum puteți converti rapid mai multe întâlniri în sarcini în Outlook?

În acest articol, voi vorbi despre cum să convertiți o întâlnire sau mai multe întâlniri în sarcini rapid și ușor în Outlook.

Convertiți o întâlnire în sarcină prin glisare și plasare

Convertiți mai multe întâlniri în sarcini prin aplicarea codului VBA


Convertiți o întâlnire în sarcină prin glisare și plasare

Pentru a converti o întâlnire în sarcină, trebuie doar să trageți întâlnirea în dosarul sarcinii, vă rugăm să procedați astfel:

1. În Calendar fereastra, selectați elementul de întâlnire pe care trebuie să îl convertiți în sarcină și apoi trageți-l și fixați-l în Sarcini pictograma din partea de jos a panoului de navigare, după cum se arată în următoarea captură de ecran:

numire doc pentru sarcina 1

2. Apoi un nou Sarcină fereastra este afișată, vă rugăm să faceți clic pe Salvați și închideți pentru a salva această întâlnire ca sarcină. Vedeți captura de ecran:

numire doc pentru sarcina 2


Convertiți mai multe întâlniri în sarcini prin aplicarea codului VBA

Dacă aveți mai multe întâlniri, trebuie să le convertiți în sarcini, codul VBA de mai jos vă poate face o favoare, vă rugăm să faceți următoarele:

1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. Apoi, faceți clic Insera > Module, copiați și lipiți codul de mai jos în modulul gol deschis, vedeți captura de ecran:

Cod VBA: convertiți mai multe întâlniri în sarcini

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

numire doc pentru sarcina 3

3. Apoi selectați întâlnirile pe care doriți să le convertiți în sarcină, apoi faceți clic pe Rulați Macro butonul pentru a rula acest cod, vezi captura de ecran:

numire doc pentru sarcina 4

4. Și apoi a Selectați Dosar va apărea un dialog, selectați un Sarcini folder în care doriți să salvați rezultatele convertite, consultați captura de ecran:

numire doc pentru sarcina 5

5. Apoi apasa OK butonul și toate rezervările selectate vor fi create ca sarcini, apoi ar trebui să salvați și să închideți Sarcină fereastră una câte una, vezi captura de ecran:

numire doc pentru sarcina 6

6. Apoi, puteți merge la Sarcină folder, toate programările selectate au fost salvate ca sarcini noi, vezi captura de ecran:

numire doc pentru sarcina 7


Kutools pentru Outlook - aduce 100 de caracteristici avansate în Outlook și face munca mult mai ușoară!

  • Auto CC / BCC prin reguli la trimiterea e-mailului; Auto înainte Mai multe e-mailuri personalizate; Răspuns automat fără server de schimb și mai multe funcții automate ...
  • Avertisment BCC - afișați mesajul când încercați să răspundeți la toate dacă adresa dvs. de e-mail se află în lista BCC; Amintiți-vă când lipsesc atașamentele, și mai multe caracteristici de reamintire ...
  • Răspundeți (Toate) Cu toate atașamentele din conversația prin e-mail; Răspunde la multe e-mailuri în secunde; Adăugare automată felicitare când răspundeți; Adăugați o dată în subiect ...
  • Instrumente de atașament: gestionați toate atașamentele din toate e-mailurile, Detașare automată, Comprimă toate, Redenumiți toate, Salvați toate ... Raport rapid, Numărați mesajele selectate...
  • E-mailuri nedorite puternice după obicei; Eliminați e-mailurile și persoanele de contact duplicate... Vă permit să faceți mai inteligent, mai rapid și mai bine în Outlook.
shot kutools outlook kutools fila 1180x121
shot kutools outlook kutools plus fila 1180x121
 
Comentarii (0)
Încă nu există evaluări. Fii primul care evaluează!
Nu există comentarii postate aici încă
Lăsa comentarii
Postare ca invitat
×
Evaluează această postare:
0   Caractere
Locații sugerate

Urmărește-ne

Copyright © 2009 - www.extendoffice.com. | Toate drepturile rezervate. Cu sprijinul ExtendOffice. | Harta site-ului
Microsoft și sigla Office sunt mărci comerciale sau mărci comerciale înregistrate ale Microsoft Corporation în Statele Unite și / sau în alte țări.
Protejat de Sectigo SSL