Ինչպե՞ս ստեղծել Outlook- ի հիշեցումներ Excel աղյուսակից:
Այս հոդվածում խոսվում է Excel աղյուսակի տվյալների հիման վրա Outlook հիշեցումներ ստեղծելու մասին:
Crete Outlook հիշեցումներ Excel աղյուսակից VBA կոդով
Ստեղծեք Outlook հիշեցումներ Excel աղյուսակից VBA կոդով
Եթե ցանկանում եք ստեղծել Outlook- ի հիշեցումներ Excel- ից, արեք հետևյալը.
1. Ստեղծել աշխատանքային թերթ պարունակում է սյունակի վերնագրերը և համապատասխան հիշեցման դաշտերը, ինչպես ցույց է տրված նկարում:
Նշում: Համար զբաղված կարգավիճակ սյուն, համար 2 նշանակում է, որ հիշեցումը կցուցադրվի որպես Զբաղված ձեր Outlook օրացույցում: Կարող եք փոխել այն 1 (նախնական), 3 (գրասենյակից դուրս), 4 (Աշխատում է այլուր)Կամ 5 (անվճար) ինչպես դուք պետք է:
2. Սեղմեք ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
3. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, Դրանից հետո պատճենեք ներքևում գտնվող VBA կոդն օրենսգրքի պատուհանում:
VBA կոդ. Ստեղծեք Outlook հիշեցումներ Excel աղյուսակից
Sub AddAppointments()
'Update by Extendoffice 20180608
Dim I As Long
Dim xRg As Range
Dim xOutApp As Object
Dim xOutItem As Object
Set xOutApp = CreateObject("Outlook.Application")
Set xRg = Range("A2:G2")
For I = 1 To xRg.Rows.Count
Set xOutItem = xOutApp.createitem(1)
Debug.Print xRg.Cells(I, 1).Value
xOutItem.Subject = xRg.Cells(I, 1).Value
xOutItem.Location = xRg.Cells(I, 2).Value
xOutItem.Start = xRg.Cells(I, 3).Value
xOutItem.Duration = xRg.Cells(I, 4).Value
If Trim(xRg.Cells(I, 5).Value) = "" Then
xOutItem.BusyStatus = 2
Else
xOutItem.BusyStatus = xRg.Cells(I, 5).Value
End If
If xRg.Cells(I, 6).Value > 0 Then
xOutItem.ReminderSet = True
xOutItem.ReminderMinutesBeforeStart = xRg.Cells(I, 6).Value
Else
xOutItem.ReminderSet = False
End If
xOutItem.Body = xRg.Cells(I, 7).Value
xOutItem.Save
Set xOutItem = Nothing
Next
Set xOutApp = Nothing
End Sub
ՆշումՎերոհիշյալ ծածկագրում A2: G2 տվյալների տիրույթն է, որի հիման վրա ուզում եք նշանակումներ ստեղծել:
4. Սեղմեք F5 կոճակը գործելու համար սեղմեք կամ սեղմեք Run կոճակը: Այնուհետև հատուկ դաշտերով բոլոր հանդիպումները միանգամից կտեղադրվեն ձեր Outlook- ի օրացույցում:
Եվ ապա, արդյունքները դիտելու համար կարող եք գնալ ձեր կանխատեսումների Օրացույց, տե՛ս նկարը.
Գրասենյակի արտադրողականության լավագույն գործիքները
Outlook- ի համար նախատեսված գործիքներ - Ավելի քան 100 հզոր գործառույթ՝ ձեր Outlook-ը լիցքավորելու համար
🤖 AI Փոստի օգնական: Ակնթարթային պրոֆեսիոնալ նամակներ AI մոգությամբ. մեկ սեղմումով հանճարեղ պատասխաններ, կատարյալ հնչերանգներ, բազմալեզու վարպետություն: Փոխակերպեք էլ. փոստը առանց ջանքերի: ...
📧 Email ավտոմատացում: Գրասենյակից դուրս (հասանելի է POP-ի և IMAP-ի համար) / Ժամանակացույց ուղարկել նամակներ / Ավտոմատ CC/BCC էլփոստ ուղարկելիս կանոններով / Ավտոմատ փոխանցում (Ընդլայնված կանոններ) / Ավտոմատ ավելացնել ողջույնները / Ավտոմատ կերպով բաժանել բազմասերիստացող նամակները առանձին հաղորդագրությունների ...
📨 էլեկտրոնային կառավարման: Հեշտությամբ հիշեք նամակները / Արգելափակել խարդախության նամակները ըստ առարկաների և այլոց / Deleteնջել կրկնօրինակ նամակները / Ընդլայնված որոնում / Համախմբել Թղթապանակները ...
📁 Հավելվածներ Pro: Խմբաքանակի պահպանում / Խմբաքանակի անջատում / Խմբաքանակային կոմպրես / Auto Save- ը / Ավտոմատ անջատում / Ավտոմատ սեղմում ...
🌟 Ինտերֆեյս Magic: 😊Ավելի գեղեցիկ և զով էմոջիներ / Բարձրացրեք ձեր Outlook-ի արտադրողականությունը ներդիրներով դիտումների միջոցով / Նվազագույնի հասցնել Outlook-ը փակելու փոխարեն ...
???? Մեկ սեղմումով Հրաշքներ: Պատասխանել բոլորին մուտքային հավելվածներով / Հակաֆիշինգի էլ. նամակներ / 🕘Ցուցադրել ուղարկողի ժամային գոտին ...
👩🏼🤝👩🏻 Կոնտակտներ և օրացույց: Խմբաքանակի ավելացրեք կոնտակտներ ընտրված էլ / Կոնտակտային խումբը բաժանեք առանձին խմբերի / Հեռացնել ծննդյան հիշեցումները ...
Over 100 Նկարագրություն Սպասեք ձեր հետազոտությանը: Սեղմեք այստեղ՝ ավելին բացահայտելու համար: