Ja vēlaties ātri ievietot tekstus diezgan garas e -pasta ziņas beigās, jums būs nepieciešams laiks, lai ritinātu uz leju līdz beigām. Šajā rakstā tiks parādīta metode, kas ļaus jums ātri pāriet uz e -pasta teksta beigām vai sākumu, izmantojot VBA.
Dažreiz, skatot garu e -pasta ziņojumu, iespējams, vēlēsities pāriet vai pārvietot kursoru uz beigām vai start no ziņojuma pamatteksta ātri pēc vēlēšanās. Piemēram, vēlaties pārbaudīt sūtītāja parakstu, tāpēc jums ir jāpāriet līdz beigām. Kopumā jums ir jāturpina ritināt uz leju līdz beigām. Tas var būt nedaudz apgrūtinoši. Tāpēc šeit mēs jums piedāvāsim VBA koda gabalu, kas var palīdzēt pāriet uz beigām vai start tikai ar vienu klikšķi.
Ātri pāriet uz ziņojuma pamatteksta sākumu vai beigām
- Jau pašā sākumā start savu Outlook programmu.
- Pēc tam galvenajā Outlook logā nospiediet taustiņu pogas “Alt + F11”.
- Pēc tam ievadīsit logu “Microsoft Visual Basic for Applications”.
- Šajā brīdī jums ir jāatver tukšs modulis vai tieši jāievieto jauns.
- Pēc tam jums vajadzētu nokopēt un ielīmēt šādu VBA kodu šādā moduļa logā.
Dim objCurrentMail As Outlook.MailItem Dim objWordDocument As Word.Document Dim objWordRange As Word.Range Dim VarPosition As Variant Sub JumpToEnd () 'Darbojieties tikai tad, ja pašreizējā e -pastā tiek lietots vārdu redaktors Set objCurrentMail = Outlook.Application.ActiveInspector.Current objCurrentMail.GetInspector.WordEditor Ja nē (objWordDocument Is Nothing) Tad VarPosition = objWordDocument.Range.End - 1 Set objWordRange = objWordDocument.Range (VarPosition, VarPosition) objWordRange.Select EndoStart () Ja nē (objWordDocument Is Nothing), tad VarPosition = objWordDocument.Range.Start Iestatiet objWordRange = objWordDocument.Range (VarPosition, VarPosition) objWordRange. Atlasiet Beigu Ja beigas Apakš
- Pēc tam jums labāk bija pievienot abas jaunās apakšprogrammas ziņojumu loga ātrās piekļuves rīkjoslai.
- Vispirms atveriet e -pastu ziņojuma logā.
- Pēc tam ātrās piekļuves rīkjoslā noklikšķiniet uz lejupvērstās bultiņas.
- Nolaižamajā sarakstā jāizvēlas “Vairāk komandu”.
- Nākamajā logā varat pievienot makro ātrās piekļuves rīkjoslai, piemēram, šo ekrānuzņēmumu:
- Visbeidzot noklikšķiniet uz virknes “Labi”, lai saglabātu izmaiņas.
- Galu galā no šī brīža jūs varat pāriet uz start vai e -pasta beigas, vienkārši noklikšķinot uz pogas ātrās piekļuves rīkjoslā, kas parādīta kā šāds attēls:
Ko darīt, ja PST fails tiek apdraudēts?
Sakarā ar to, ka PST fails ir pakļauts kļūdām un korupcijai, jums vajadzētu darīt visu iespējamo, lai aizsargātu savus PST datus. Piemēram, jums regulāri jāveido PST faila dublējums. Turklāt, lai varētu atgriezties bojāts PST datus savlaicīgi, labāk turēt tuvumā jaudīgu rīku, piemēram DataNumen Outlook Repair. Tā specializējas PST problēmu novēršanā un PST datu izgūšanā.
Autora ievads:
Šērlija Džana ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp SQL Server noteikts un perspektīvas remonta programmatūras produktus. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar