Kui soovite üsna pika meilisõnumi lõppu kiiresti tekste sisestada, kulub lõpuni kerimiseks veidi aega. See artikkel tutvustab meetodit, mis võimaldab teil VBA kaudu kiiresti e-kirja sisu lõppu või algusse hüpata.
Mõnikord, pikka e-kirja vaadates, võite soovida kiiresti sõnumi sisu lõppu või algusesse hüpata või kursorit sinna liigutada. Näiteks kui soovite kontrollida saatja allkirja, peate hüppama lõppu. Üldiselt peate kerima allapoole, kuni jõuate lõppu. See võib olla veidi tülikas. Seetõttu pakume siin teile VBA-koodi, mis aitab teil ühe klõpsuga lõppu hüpata või alustada.
Liikuge kiiresti sõnumiosa algusesse või lõppu
- Alguses käivitage oma Outlooki programm.
- Seejärel vajutage Outlooki põhiaknas klahvikombinatsiooni Alt + F11.
- Järgmisena sisenete aknasse "Microsoft Visual Basic for Applications".
- Sel hetkel peate avama tühja mooduli või sisestama otse uue.
- Seejärel peaksite sellisesse mooduli aknasse kopeerima ja kleepima järgmise VBA koodi.
Dim objCurrentMail As Outlook.MailItem Dim objWordDocument As Word.Document Dim objWordRange As Word.Range Dim VarPosition As Variant Sub JumpToEnd() 'Töötab ainult siis, kui praegune e-kiri kasutab tekstiredaktorit' Set objCurrentMail = Outlook.Application.ActiveInspector.CurrentItem Set objWordDocument = objCurrentMail.GetInspector.WordEditor If Not (objWordDocument Is Nothing) Then VarPosition = objWordDocument.Range.End - 1 Set objWordRange = objWordDocument.Range(VarPosition, VarPosition) objWordRange.Select End If End Sub Sub JumpToStart() If Not (objWordDocument Is Nothing) Then VarPosition = objWordDocument.Range.Start Set objWordRange = objWordDocument.Range(VarPosition, VarPosition) objWordRange.Select Lõpp, kui lõpp-alam
- Pärast seda oleks parem lisada kaks uut alamprogrammi sõnumiakna kiirjuurdepääsu tööriistaribale.
- Esiteks avage sõnumiaknas e-kiri.
- Seejärel klõpsake kiirpääsu tööriistaribal allanoolt.
- Rippmenüüst peaksite valima "Veel käske".
- Järgmises aknas saate kiirpääsu tööriistaribale makrosid lisada nagu järgmine ekraanipilt:
- Lõpuks klõpsake muudatuste salvestamiseks rida "OK".
- Lõpuks saate nüüdsest e-kirja algusesse või lõppu hüpata lihtsalt kiirpääsuribal asuvat nuppu klõpsates, mis on näidatud järgmisel pildil:
Mis siis, kui PST-fail satub ohtu?
Kuna PST-fail on vastuvõtlik vigadele ja korruptsioonile, peaksite oma PST-andmete kaitsmiseks andma endast parima. Näiteks peate oma PST-faili perioodiliselt varundama. Veelgi enam, et oleks võimalik tagasi saada kahjustatud PST andmed õigeaegselt, peaksite hoidma läheduses võimsat tööriista, näiteks DataNumen Outlook Repair. See on spetsialiseerunud PST-probleemide lahendamisele ja PST-andmete hankimisele.
Autori sissejuhatus:
Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas SQL Server määrata ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom