Din anumite motive, ați inserat mai multe hyperlinkuri către texte în e-mailul Outlook. Și unele dintre ele sunt legate la aceeași adresă. Dacă doriți să schimbați în serie adresele acestor hyperlinkuri, puteți utiliza metodele introduse în acest articol.
De exemplu, ați compus un e-mail Outlook, care are o mulțime de hyperlinkuri în corpul mesajului. Totuși, după aceea, ai descoperit că o adresă este greșită. Și multe hyperlinkuri folosesc această adresă. Prin urmare, trebuie să modificați în serie adresele acestor hyperlinkuri. Ca răspuns la această problemă, în continuare, vom împărtăși 2 abordări simple și rapide.
Metoda 1: Găsiți și înlocuiți manual
- Pentru început, în e-mailul deschis, apăsați butoanele tastei „Alt + F9”.
- Apoi, toate adresele hyperlink-urilor vor fi afișate direct.
- Acum, apăsați „Ctrl + H” pentru a afișa caseta de dialog „Găsiți și înlocuiți”.
- În această nouă casetă de dialog, introduceți adresa veche a hyperlink în caseta „Găsiți ce” și adresa nouă în caseta „Înlocuiți cu”.
- După aceea, faceți clic pe butonul „Înlocuiește tot”.
- Mai târziu, închideți caseta de dialog „Găsiți și înlocuiți”.
- După revenirea la corpul mesajului, apăsați din nou tastele „Alt + F9” pentru a ascunde adresele hyperlink.
- Ulterior, apăsați „Ctrl + A” pentru a selecta tot corpul mesajului.
- În cele din urmă, atingeți tasta „F9” pentru a actualiza toate adresele de hyperlink modificate.
- Acum, verificați adresele hyperlink-urilor lăsând cursorul să treacă deasupra textelor. Toate hyperlinkurile care sunt legate de adresele vechi au fost modificate, ca în următoarea captură de ecran.
Metoda 2: Utilizați Outlook VBA
- În primul rând, apăsați „Alt + F11” pentru a lansa editorul VBA.
- Apoi, în noua fereastră, activați „MS Word Object Library” conform articolului „Cum se adaugă o referință la o bibliotecă de obiecte în VBA".
- Apoi, puneți următorul cod VBA într-un 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
- Apoi, adăugați această macrocomandă la Bara de instrumente Acces rapid a ferestrei de mesaje cu referire la „Cum să rulați codul VBA în Outlook".
- În cele din urmă, urmați pașii de mai jos pentru a o încerca.
- În casetele de dialog pop-up, introduceți adresele de hyperlink vechi și noi.
- Când macrocomanda se termină, veți primi un mesaj care vă va spune numărul de hyperlinkuri ale căror adrese au fost modificate.
- Adresele mai multor hyperlinkuri au fost modificate, ca în imaginea de mai jos.
Protejează-ți datele Outlook valoroase
Deoarece Outlook este predispus la erori și corupție, trebuie să luați câteva măsuri de precauție eficiente pentru a vă proteja fișierul Outlook. În primul rând, trebuie să faceți copii de rezervă regulate ale datelor PST. De asemenea, ar trebui să vă construiți un obicei bun de a vă închide Outlook într-un mod adecvat. Nu în ultimul rând, este mai bine să pregătiți un puternic Remediere Outlook utilitate, cum ar fi DataNumen Outlook Repair.
Introducerea autorului:
Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv SQL Server recuperare și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com