Jostain syystä olet lisännyt Outlook-sähköpostiisi useita hyperlinkkejä teksteihin. Ja osa niistä on linkitetty samaan osoitteeseen. Jos haluat muuttaa näiden hyperlinkkien osoitteita erässä, voit käyttää tässä artikkelissa esiteltyjä menetelmiä.
Olet esimerkiksi kirjoittanut Outlook-sähköpostin, jonka viestin tekstiosassa on paljon hyperlinkkejä. Kuitenkin myöhemmin huomasit, että osoite on väärä. Ja monet hyperlinkit käyttävät tätä osoitetta. Siksi sinun on tehtävä erämuutoksia näiden hyperlinkkien osoitteita. Vastauksena tähän ongelmaan jaamme tämän jälkeen kaksi helppoa ja nopeaa lähestymistapaa.
Tapa 1: Etsi ja korvaa manuaalisesti
- Paina aluksi avatussa sähköpostissa “Alt + F9” -näppäinpainikkeita.
- Sitten kaikkien hyperlinkkien osoitteet näytetään suoraan.
- Paina nyt "Ctrl + H" tuodaksesi esiin "Etsi ja korvaa" -valintaikkunan.
- Syötä tässä uudessa valintaikkunassa vanha hyperlinkin osoite "Etsi mikä" -ruutuun ja uusi osoite "Korvaa" -ruutuun.
- Napsauta sen jälkeen "Korvaa kaikki" -painiketta.
- Sulje myöhemmin "Etsi ja korvaa" -valintaikkuna.
- Palattuasi viestin runkoon, paina "Alt + F9" -näppäimiä uudelleen piilottaaksesi hyperlinkkien osoitteet.
- Paina sen jälkeen "Ctrl + A" valitaksesi koko viestin tekstin.
- Napauta lopuksi "F9" -näppäintä päivittääksesi kaikki muuttuneet hyperlinkkien osoitteet.
- Tarkista nyt hyperlinkkien osoitteet pitämällä kohdistinta tekstien yläpuolella. Kaikki hyperlinkit, jotka on linkitetty vanhoihin osoitteisiin, on muutettu, kuten seuraava kuvakaappaus.
Tapa 2: Käytä Outlook VBA: ta
- Ensinnäkin paina "Alt + F11" käynnistääksesi VBA-editori.
- Ota sitten uudessa ikkunassa käyttöön ”MS Word Object Library” artikkelin ”Objektikirjastoviittauksen lisääminen VBA:ssa".
- Laita seuraavaksi seuraava VBA-koodi moduuliin.
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
- Lisää tämän jälkeen tämä makro viestiikkunan pikatyökalupalkkiin viittaamalla "Kuinka suorittaa VBA-koodi Outlookissa".
- Noudata lopulta alla olevia vaiheita kokeillaksesi sitä.
- Kirjoita ponnahdusikkunaan vanha ja uusi hyperlinkin osoite.
- Kun makro on valmis, saat viestin, joka kertoo niiden hyperlinkkien lukumäärän, joiden osoitteita on muutettu.
- Useiden hyperlinkkien osoitteita on muutettu, kuten alla olevassa kuvassa.
Suojaa arvokkaat Outlook-tietosi
Koska Outlook on altis virheille ja korruptiolle, sinun on suoritettava tehokkaita varotoimia Outlook-tiedoston suojaamiseksi. Ensinnäkin sinun on tehtävä säännölliset PST-tietojen varmuuskopiot. Sinun tulisi myös rakentaa hyvä tapa sulkea Outlook oikealla tavalla. Viimeisenä mutta ei vähäisimpänä, sinun on parempi valmistaa voimakas Outlook-korjaus apuohjelma, kuten DataNumen Outlook Repair.
Tekijän esittely:
Shirley Zhang on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien SQL Server elpyminen ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com






