Z jakiegoś powodu wstawiłeś wiele hiperłączy do tekstów w wiadomości e-mail programu Outlook. A niektóre z nich są powiązane z tym samym adresem. Jeśli chcesz zbiorczo zmienić adresy tych hiperłączy, możesz skorzystać z metod przedstawionych w tym artykule.
Na przykład utworzyłeś wiadomość e-mail programu Outlook, która zawiera wiele hiperłączy w treści wiadomości. Jednak później odkryłeś, że adres jest błędny. Z tego adresu korzysta wiele hiperłączy. Dlatego musisz zmienić wsadowo adresy tych hiperłączy. W odpowiedzi na ten problem w dalszej części udostępnimy 2 łatwe i szybkie podejścia.
Metoda 1: Znajdź i zamień ręcznie
- Na początek w otwartej wiadomości e-mail naciśnij przyciski klawiszy „Alt + F9”.
- Następnie wszystkie adresy hiperłączy zostaną pokazane bezpośrednio.
- Teraz naciśnij "Ctrl + H", aby wyświetlić okno dialogowe "Znajdź i zamień".
- W tym nowym oknie dialogowym wprowadź stary adres hiperłącza w polu „Znajdź co” i nowy adres w polu „Zamień na”.
- Następnie kliknij przycisk „Zamień wszystko”.
- Później zamknij okno dialogowe „Znajdź i zamień”.
- Po powrocie do treści wiadomości ponownie naciśnij klawisze „Alt + F9”, aby ukryć adresy hiperłączy.
- Następnie naciśnij „Ctrl + A”, aby zaznaczyć całą treść wiadomości.
- Na koniec dotknij klawisza „F9”, aby zaktualizować wszystkie zmienione adresy hiperłączy.
- Teraz sprawdź adresy hiperłączy, umieszczając kursor nad tekstami. Wszystkie hiperłącza, które są połączone ze starymi adresami, zostały zmienione, jak na poniższym zrzucie ekranu.
Metoda 2: Skorzystaj z programu Outlook VBA
- W pierwszej kolejności naciśnij „Alt + F11”, aby uruchomić edytor VBA.
- Następnie w nowym oknie należy włączyć „Bibliotekę obiektów MS Word” zgodnie z artykułem „Jak dodać odwołanie do biblioteki obiektów w języku VBA".
- Następnie umieść następujący kod VBA w module.
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
- Następnie dodaj to makro do paska narzędzi szybkiego dostępu w oknie wiadomości, odwołując się do „Jak uruchomić kod VBA w swoim Outlooku".
- W końcu wykonaj poniższe czynności, aby to wypróbować.
- W wyskakujących oknach dialogowych wprowadź stare i nowe adresy hiperłączy.
- Po zakończeniu działania makra otrzymasz komunikat informujący o liczbie hiperłączy, których adresy zostały zmienione.
- Adresy wielu hiperłączy zostały zmienione, jak na poniższym obrazku.
Chroń swoje cenne dane programu Outlook
Ponieważ program Outlook jest podatny na błędy i uszkodzenia, należy podjąć pewne skuteczne środki ostrożności, aby zabezpieczyć plik programu Outlook. Przede wszystkim musisz regularnie wykonywać kopie zapasowe danych PST. Powinieneś także zbudować dobry nawyk zamykania Outlooka w odpowiedni sposób. Last but not least, lepiej jest przygotować mocny Poprawka programu Outlook narzędzie, takie jak DataNumen Outlook Repair.
Wprowadzenie autora:
Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym SQL Server regeneracja i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com