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

Sut i drosi apwyntiadau lluosog yn dasgau yn gyflym yn Outlook?

Yn yr erthygl hon, byddaf yn siarad am sut i drosi apwyntiad neu apwyntiadau lluosog yn dasgau yn gyflym ac yn hawdd yn Outlook.

Trosi un apwyntiad i'r dasg trwy lusgo a gollwng

Trosi apwyntiadau lluosog i dasgau trwy gymhwyso cod VBA


Trosi un apwyntiad i'r dasg trwy lusgo a gollwng

I drosi un apwyntiad yn dasg, does ond angen i chi lusgo'r apwyntiad i ffolder tasgau, gwnewch fel hyn:

1. Yn y calendr ffenestr, dewiswch yr eitem apwyntiad y mae angen i chi ei throsi i dasg ac yna llusgwch hi a'i gollwng i'r Tasgau eicon ar waelod y cwarel llywio fel y dangosir y llun a ganlyn:

apwyntiad doc i dasg 1

2. Yna newydd Gorchwyl ffenestr yn cael ei harddangos, cliciwch Arbed a Chau botwm i achub yr apwyntiad hwn fel tasg. Gweler y screenshot:

apwyntiad doc i dasg 2


Trosi apwyntiadau lluosog i dasgau trwy gymhwyso cod VBA

Os oes gennych sawl apwyntiad mae angen eu trosi'n dasgau, gall y cod VBA isod ffafrio chi, gwnewch fel a ganlyn:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Ac yna, cliciwch Mewnosod > Modiwlau, copïo a gludo islaw'r cod i'r modiwl gwag agored, gweler y screenshot:

Cod VBA: Trosi apwyntiadau lluosog yn dasgau

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

apwyntiad doc i dasg 3

3. Yna dewiswch yr apwyntiadau rydych chi am eu trosi'n dasg, ac yna cliciwch Rhedeg Macro botwm i redeg y cod hwn, gweler y screenshot:

apwyntiad doc i dasg 4

4. Ac yna a Dewis Ffolder bydd dialog yn popio allan, dewis a Tasgau ffolder lle rydych chi am arbed y canlyniadau sydd wedi'u trosi, gweler y screenshot:

apwyntiad doc i dasg 5

5. Yna cliciwch OK botwm, a bydd yr holl apwyntiadau a ddewiswyd yn cael eu creu fel tasgau, ac yna dylech arbed a chau'r Gorchwyl ffenestr fesul un, gweler y screenshot:

apwyntiad doc i dasg 6

6. Yna, gallwch chi fynd i'r Gorchwyl ffolder, mae'r holl apwyntiadau a ddewiswyd wedi'u cadw fel tasgau newydd, gweler y screenshot:

apwyntiad doc i dasg 7


Kutools for Outlook - Yn Dod â 100 o Nodweddion Uwch i'w Rhagweld, a Gwneud Gwaith yn Haws Osgach!

  • Auto CC / BCC yn ôl rheolau wrth anfon e-bost; Auto Ymlaen E-byst Lluosog yn ôl arfer; Ymateb Auto heb weinydd cyfnewid, a nodweddion mwy awtomatig ...
  • Rhybudd BCC - dangoswch neges pan geisiwch ateb popeth os yw'ch cyfeiriad post yn rhestr BCC; Atgoffwch Wrth Ymlyniadau ar Goll, a mwy o nodweddion atgoffa ...
  • Ymateb (Pawb) Gyda'r Holl Atodiadau yn y sgwrs bost; Ateb Llawer o E-byst mewn eiliadau; Auto Ychwanegu Cyfarchiad wrth ateb; Ychwanegu Dyddiad i'r pwnc ...
  • Offer Ymlyniad: Rheoli Pob Atodiad ym mhob Post, Datgysylltiad Auto, Cywasgu Pawb, Ail-enwi Pawb, Arbed Pawb ... Adroddiad Cyflym, Cyfrif Postiau Dethol...
  • E-byst Sothach Pwerus yn ôl arfer; Tynnwch y Post a Chysylltiadau Dyblyg... Yn eich galluogi i wneud yn ddoethach, yn gyflymach ac yn well yn Outlook.
tab kutools rhagweld kutools tab 1180x121
kutools rhagweld rhagolygon kutools ynghyd â thab 1180x121
 
sylwadau (0)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir

Dilynwch ni

Hawlfraint © 2009 - www.extendoffice.com. | Cedwir pob hawl. Wedi ei bweru gan ExtendOffice. | Map o'r safle
Mae Microsoft a logo'r Swyddfa yn nodau masnach neu'n nodau masnach cofrestredig Microsoft Corporation yn yr Unol Daleithiau a / neu wledydd eraill.
Wedi'i warchod gan Sectigo SSL