Ինչպե՞ս որոնել և փոխարինել նշանակման թեման Outlook օրացույցում:
Outlook- ի օրացույցում գտնել և փոխարինել նշանակման թեման օգտակար է, երբ գտնում եք, որ որոշ առարկաներ պետք է փոխարինվեն զանգվածաբար նույն տեքստերով: Կամ Outlook- ում տվյալների ներմուծումից հետո թեմայի դաշտում փոխարինեք Պատճենել բառը: Այս հոդվածը ձեզ տրամադրում է VBA կոդ ՝ նշանակման բազմաթիվ առարկաներ որոնելու և փոխարինելու համար: Խնդրում ենք թերթել ավելի մանրամասն:
Փնտրեք և փոխարինեք նշանակման թեման VBA կոդով
- Ավտոմատացնել էլ Auto CC / BCC, Ավտոմեքենաների փոխանցում կանոններով; ուղարկել Ավտոմատ պատասխան (Offoff Office) առանց փոխանակման սերվեր պահանջելու...
- Ստացեք նման հիշեցումներ Նախազգուշացում BCC- ի համար երբ պատասխանում եք բոլորին, երբ դուք BCC ցուցակում եք, և Հիշեցրեք հավելվածները բաց թողնելիս մոռացված հավելվածների համար...
- Բարելավել էլփոստի արդյունավետությունը Պատասխանել (Բոլորը) Հավելվածներով, Ավտոմատ ավելացրեք ողջույն կամ ամսաթիվ և ժամ ստորագրության կամ թեմայի մեջ, Պատասխանել բազմաթիվ էլ...
- Հեշտացնել էլփոստի ուղարկումը Վերհիշել նամակները, Կցման գործիքներ (Սեղմել բոլորը, ավտոմատ պահել բոլորը...), Հեռացնել կրկնօրինակները, եւ Արագ հաշվետվություն...
Փնտրեք և փոխարինեք նշանակման թեման VBA կոդով
Այս բաժնում կարող եք որոնել և փոխարինել նշանակման թեման VBA կոդով հետևյալ կերպ.
1. Նախ, ձեր Outlook- ում պետք է մակրո պարամետրերը դնել ցածր:
1) Outlook 2010-ում և 2013-ում կտտացրեք Ֆայլ > Ընտրանքներ. Եվ է Outlook տարբերակները երկխոսության վանդակում, սեղմեք Վստահության կենտրոն ձախ բարում, ապա կտտացրեք Վստահության կենտրոնի կարգավորումները կոճակը:
Է Վստահության կենտրոն երկխոսության վանդակում, սեղմեք Մակրո կարգավորումներ ձախ բարում, ապա ընտրեք Միացնել բոլոր մակրոները տարբերակը Մակրո կարգավորումներ Բաժին. Եվ կտտացրեք OK կոճակ Տեսեք,
2) Outlook 2007-ում սեղմեք Գործիքներ > Վստահության կենտրոն, Մեջ Վստահության կենտրոն երկխոսության վանդակում, սեղմեք Մակրո կարգավորումներ ձախ բարում, ապա ընտրեք Մակրոների անվտանգության ստուգում չկա ընտրեք եւ կտտացրեք OK կոճակը:
2. Սեղմեք ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
3. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, կրկնակի սեղմեք ՝ ընդլայնելու համար project1 > Microsoft Outlook օբյեկտներ > ԱյսOutlookSession- ը բացել VBA խմբագիրը: Տեսեք,
4. Պատճենեք և տեղադրեք հետևյալ VBA կոդը VBA խմբագրի մեջ: Եվ հետո սեղմեք F5 ծածկագիրը գործելու համար:
VBA. Գտնել և փոխարինել նշանակման թեման
Sub FindReplaceAppointment()
Dim oApp As Outlook.Application
Dim oCalFolder As Outlook.MAPIFolder
Dim oAppt As Outlook.AppointmentItem
Dim sOldText As String
Dim sNewText As String
Dim iCalChangedCount As Integer
Set oApp = Outlook.Application
MsgBox ("This script will perform a find/replace in the subject line of all appointments in a specified calendar.")
sOldText = InputBox("What is the text string that you would like to replace?")
sNewText = InputBox("With what would you like to replace it?")
' Check to be sure a Calendar folder was selected
Do
If Not (oCalFolder Is Nothing) Then
If (oCalFolder.DefaultItemType = olAppointmentItem) Then Exit Do
End If
MsgBox ("Please select a calendar folder from the following list.")
Set oCalFolder = Application.Session.PickFolder
On Error GoTo ErrHandler:
Loop Until oCalFolder.DefaultItemType = olAppointmentItem
' Loop through appointments in calendar, change text where necessary, keep count
iCalChangedCount = 0
For Each oAppt In oCalFolder.Items
If InStr(oAppt.Subject, sOldText) <> 0 Then
Debug.Print "Changed: " & oAppt.Subject & " - " & oAppt.Start
oAppt.Subject = Replace(oAppt.Subject, sOldText, sNewText)
oAppt.Save
iCalChangedCount = iCalChangedCount + 1
End If
Next
' Display results and clear table
MsgBox (iCalChangedCount & " appointments had text in their subjects changed from '" & sOldText & "' to '" & sNewText & "'.")
Set oAppt = Nothing
Set oCalFolder = Nothing
Exit Sub
ErrHandler:
MsgBox ("Macro terminated.")
End Sub
5. Կոդը գործարկելուց հետո, ա Microsoft Outlook երկխոսության պատուհանը բացվում է: Սեղմիր OK կոճակը:
6. Երկրորդում Microsoft Outlook երկխոսության տուփ, մուտքագրեք տեքստը, որը ցանկանում եք փոխարինել, և այնուհետև կտտացրեք այն OK կոճակը:
7. Երրորդում Microsoft Outlook երկխոսության տուփ, մուտքագրեք այն տեքստը, որը ցանկանում եք փոխարինել, և կտտացրեք OK.
ՆշումԵթե դուք պարզապես ցանկանում եք հեռացնել բոլոր «Պատճենել» բառերը թեմայից նշված օրացույցում, խնդրում ենք այս դաշտը թողնել դատարկ:
8. Սեղմեք OK կոճակը ներքևի երկխոսության դաշտում:
9. Մեջ Ընտրեք թղթապանակը երկխոսության տուփ, ընտրեք ձեր օրացույցը նշված էլփոստի հաշվի տակ և այնուհետև կտտացրեք այն OK կոճակ Տեսեք,
10. Դրանից հետո կհայտնվի երկխոսության տուփ, որը կտեղեկացնի ձեզ, որ փոխարինումը հաջող է: Խնդրում ենք սեղմել OK կոճակը:
11. Եվ այնուհետև ձեր ընտրած օրացույցի բոլոր տեքստերը փոխարինվել են նոր բովանդակությամբ:
Գրասենյակի արտադրողականության լավագույն գործիքները
Outlook- ի համար նախատեսված գործիքներ - Ավելի քան 100 հզոր գործառույթ՝ ձեր Outlook-ը լիցքավորելու համար
🤖 AI Փոստի օգնական: Ակնթարթային պրոֆեսիոնալ նամակներ AI մոգությամբ. մեկ սեղմումով հանճարեղ պատասխաններ, կատարյալ հնչերանգներ, բազմալեզու վարպետություն: Փոխակերպեք էլ. փոստը առանց ջանքերի: ...
📧 Email ավտոմատացում: Գրասենյակից դուրս (հասանելի է POP-ի և IMAP-ի համար) / Ժամանակացույց ուղարկել նամակներ / Ավտոմատ CC/BCC էլփոստ ուղարկելիս կանոններով / Ավտոմատ փոխանցում (Ընդլայնված կանոններ) / Ավտոմատ ավելացնել ողջույնները / Ավտոմատ կերպով բաժանել բազմասերիստացող նամակները առանձին հաղորդագրությունների ...
📨 էլեկտրոնային կառավարման: Հեշտությամբ հիշեք նամակները / Արգելափակել խարդախության նամակները ըստ առարկաների և այլոց / Deleteնջել կրկնօրինակ նամակները / Ընդլայնված որոնում / Համախմբել Թղթապանակները ...
📁 Հավելվածներ Pro: Խմբաքանակի պահպանում / Խմբաքանակի անջատում / Խմբաքանակային կոմպրես / Auto Save- ը / Ավտոմատ անջատում / Ավտոմատ սեղմում ...
🌟 Ինտերֆեյս Magic: 😊Ավելի գեղեցիկ և զով էմոջիներ / Բարձրացրեք ձեր Outlook-ի արտադրողականությունը ներդիրներով դիտումների միջոցով / Նվազագույնի հասցնել Outlook-ը փակելու փոխարեն ...
???? Մեկ սեղմումով Հրաշքներ: Պատասխանել բոլորին մուտքային հավելվածներով / Հակաֆիշինգի էլ. նամակներ / 🕘Ցուցադրել ուղարկողի ժամային գոտին ...
👩🏼🤝👩🏻 Կոնտակտներ և օրացույց: Խմբաքանակի ավելացրեք կոնտակտներ ընտրված էլ / Կոնտակտային խումբը բաժանեք առանձին խմբերի / Հեռացնել ծննդյան հիշեցումները ...
Over 100 Նկարագրություն Սպասեք ձեր հետազոտությանը: Սեղմեք այստեղ՝ ավելին բացահայտելու համար: