2 metode za grupnu promjenu više adresa hiperveza u vašoj Outlook e-pošti

Iz nekih razloga ste umetnuli više hiperveza na tekstove u Outlook e-poštu. A neki od njih su povezani sa istom adresom. Ako želite grupno promijeniti adrese ovih hiperveza, možete koristiti metode predstavljene u ovom članku.

Na primjer, sastavili ste Outlook e-poštu, koja ima mnogo hiperveza u tijelu poruke. Ipak, kasnije ste otkrili da je adresa pogrešna. I mnoge hiperveze koriste ovu adresu. Stoga morate grupno promijeniti adrese ovih hiperlinkova. Kao odgovor na ovaj problem, kasnije ćemo podijeliti 2 laka i brza pristupa.

Metoda 1: Ručno pronađite i zamijenite

1. Za početak, u otvorenoj e-poruci pritisnite tipke “Alt + F9”.
2. Tada će se direktno prikazati sve adrese hiperlinkova.
3. Sada pritisnite “Ctrl + H” da otvorite dijaloški okvir “Pronađi i zamijeni”.
4. U ovom novom dijaloškom okviru unesite staru adresu hiperveze u okvir „Pronađi šta“, a novu adresu u okvir „Zamijeni sa“.
5. Nakon toga kliknite na dugme "Zameni sve".
6. Kasnije zatvorite dijaloški okvir „Pronađi i zamijeni“.
7. Nakon što se vratite na tijelo poruke, ponovo pritisnite tipke “Alt + F9” da sakrijete adrese hiperlinkova.
8. Nakon toga, pritisnite “Ctrl + A” da odaberete cijelo tijelo poruke.
9. Na kraju, dodirnite tipku “F9” da ažurirate sve promijenjene adrese hiperlinkova.
10. Sada provjerite adrese hiperlinkova tako što ćete pustiti kursor da lebdi iznad tekstova. Sve hiperveze koje su povezane sa starim adresama su izmijenjene, kao na sljedećem snimku ekrana.

Metod 2: Iskoristite Outlook VBA

1. Prvo, pritisnite “Alt + F11” da pokrenete VBA editor.
2. Zatim, u novom prozoru, omogućite "MS Word Object Library" prema članku "Kako dodati referencu biblioteke objekata u VBA".
3. Zatim stavite sljedeći VBA kod u modul.

Sub BatchChangeMultipleHyperlinkAddresses()
    Dim objMail As Outlook.MailItem
    Dim objMailDocument As Word.Document
    Dim objHyperlink As Word.Hyperlink
    Dim strOldAddress, strNewAddress As String
    Dim i As Long
 
    Set objMail = Application.ActiveInspector.CurrentItem
    Set objMailDocument = objMail.GetInspector.WordEditor
 
    If objMailDocument.Hyperlinks.Count > 0 Then
       'Enter the old and new hyperlink address
       strOldAddress = InputBox("Enter the old hyperlink address:")
       strNewAddress = InputBox("Enter the new hyperlink address:")
  
       'Change hyperlink address
       i = 0
       For Each objHyperlink In objMailDocument.Hyperlinks
           If InStr(objHyperlink.Address, strOldAddress) > 0 Then
              objHyperlink.Address = Replace(objHyperlink.Address, strOldAddress, strNewAddress)
              i = i + 1
           End If
       Next
 
       'Prompt you
       MsgBox i & " hyperlinks' addresses are changed!", vbInformation + vbOKOnly
    End If
End Sub

4. Nakon toga, dodajte ovaj makro na alatnu traku za brzi pristup prozora poruke sa referencom na “Kako pokrenuti VBA kod u vašem Outlooku".
5. Na kraju, slijedite dolje navedene korake da isprobate.

• U iskačućim dijaloškim okvirima unesite staru i novu adresu hiperveze.
• Kada se makro završi, dobićete poruku koja vam govori o broju hiperlinkova čije su adrese promenjene.
• Višestruke adrese hiperlinkova su promijenjene, kao na slici ispod.

Zaštitite svoje vrijedne Outlook podatke

Budući da je Outlook sklon greškama i korupciji, morate poduzeti neke efikasne mjere opreza kako biste zaštitili svoju Outlook datoteku. Prije svega, trebate napraviti redovne sigurnosne kopije PST podataka. Takođe, trebalo bi da steknete dobru naviku zatvaranja Outlooka na odgovarajući način. Na kraju, ali ne i najmanje važno, bolje je da pripremite potentan Outlook popravka korisnost, kao npr DataNumen Outlook Repair.

Uvod za autora:

Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući SQL Server oporavak i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com