Ide: Lòt lang yo se Google-tradui. Ou ka vizite a English vèsyon nan lyen sa a.
Ouvri yon sesyon
x
or
x
x
enskri
x

or

Ki jan yo otomatikman mete aksan sou mo kle espesifik soti nan Imèl fèk ap rantre nan Outlook

Nan pespektiv, ou ka resevwa dè santèn e dè milye Imèl chak jou, èske ou janm vle oto mete aksan sou kèk mo kle espesifik nan Imèl fèk ap rantre? Nan atik sa a, mwen entwodui yon kòd VBA otomatikman mete aksan sou mo kle yo ou presize soti nan Imèl fèk ap rantre nan Outlook.

Auto mo kle mete aksan sou Imèl fèk ap rantre


Auto mo kle mete aksan sou Imèl fèk ap rantre

Pa gen fonksyon bati-an nan pespektiv ka okipe travay sa a eksepte VBA.

1. Peze Alt + F11 kle pou pèmèt a Microsoft Visual Basic pou aplikasyon pou fenèt.

2. Lè sa a, doub klike sou ThisOutlookSession nan bò gòch Pwojè fenèt, ak kopi epi kole anba kòd pou nouvo fenèt kòd la.

VBA: Auto mo kle mete aksan sou Imèl fèk ap rantre

Piblik akEvènman GMailItems Kòm Outlook.Items 'UpdatebyExtendoffice20181106 Prive Sub Application_Startup () Mete GMailItems = Outlook.Application.Session.GetDefaultFolder (olFolderInbox) .Items Fen Sub Prive Sub GMailItems_ItemAdd (ByVal Item Kòm objè) Si Item.Class <> olMail Lè sa a, sòti Sub AutoHighlight_SpecificWords Atik Fen Sub Sub AutoHighlight_SpecificWords (Mail Kòm Outlook.MailItem) Dim xWord Kòm Varyan Dim xHTMLBody Kòm String, xStr Kòm String Dim xWordArr Sou Erè Kourikouloum-vite Next xWordArr = Array ("Kutools", "Enpòtan") mo kle xHTMLBody = Mail.HTMLBody Pou Chak xWord Nan xWordArr Si InStr (xHTMLBody, xWord)> 0 Lè sa a, xStr = "<font style =" & Chr (34) & "background-koulè: jòn" & Chr (34) & ">" & xWord & / font> "xHTMLBody = Ranplase (xHTMLBody, xWord, xStr) Mail.HTMLBody = xHTMLBody Fen Si Next Post Sub.Save Next

Ide: nan kòd la, ou ka chanje mo kle yo jan ou bezwen nan sa a script xWordArr = Array ("Kutools","Ki enpòtan") .

3. Lè sa a, sove kòd la epi ale nan pespektiv, anba Akèy tab, klike sou Règleman > Jere Règ & Avètisman.
doc oto rekò tèks 1

4. Nan Règ ak avètisman dyalòg, klike sou Nouvo Règleman anba Règ imèl tab, Lè sa a, nan Règ Sòsye dyalòg, klike sou Aplike règ sou mesaj mwen resevwa yo.
doc oto rekò tèks 2

5. Klike sou Next > Next > Wi pou ale nan twazyèm dyalòg la, tcheke kouri yon script soti nan Step1 seksyon, Lè sa a, klike sou yon script in Step2 seksyon yo ki ap pèmèt Chwazi Script dyalòg, chwazi kòd sa a Project1.ThisOutlookSession.AutoHighlight_SpecificWords. Klike sou OK.
doc oto rekò tèks 3 doc oto rekò tèks 4

6. Klike sou Next > Next, nan dènye dyalòg, bay yon non pou règ sa a.
doc oto rekò tèks 5

7. Klike sou Fini > OK Pou fini règ la.

Depi koulye a, mo kle ou espesifye yo pral oto en nan Imèl fèk ap rantre yo.
doc oto rekò tèks 6


Sove oswa ekspòte Imèl miltip lòt fomat dosye (PDF / HTML / Word / EXCEL) nan pespektiv

Pafwa, ou ka vle sove oswa ekspòtasyon Imèl yo nan yon katab kòm dosye lòt fòma, tankou PDF, Pawòl oswa Excel dosye nan pespektiv. Nan pespektiv, ni nan fonksyon an sove kòm ak ekspòtasyon ka okipe travay sa a. Sepandan, Kutools pou pespektiv's Save as file sèvis piblik ka ekspòtasyon Imèl miltip nan yon folder kòm dosye ak fòma miltip nan yon fwa tan. Klike sou jou jijman gratis 45!
doc sove kòm dosye
Kutools pou Outlook: ak plizyè douzèn sou la men pespektiv ajoute-ins, gratis eseye ki pa gen okenn limit nan jou 45.


Kutools pou pespektiv

Plis pase 100 Fonksyon avanse pou pespektiv 2010, 2013, 2016, 2019 ak 365

ekran piki kutools pou pespektiv ti pou banyè 201812

Plis Features | Telechaje gratis | Se sèlman $ 39.00 pou dè santèn de fonksyon

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.