Jak przekonwertować wszystkie połączone obrazy na osadzone w dokumencie programu Word?
Gdy wyślesz dokument Worda zawiera połączone obrazy do innych osób, obrazy zostaną utracone i będą wyświetlane na komputerze odbiorcy, jak pokazano na poniższym zrzucie ekranu. Jak przekonwertować wszystkie połączone obrazy na osadzone naraz przed wysłaniem do innych? W tym artykule przedstawiono metodę VBA radzenia sobie z tym.
Konwertuj połączone obrazy na osadzone z kodem VBA
Konwertuj połączone obrazy na osadzone z kodem VBA
Zastosuj poniższy kod VBA, aby przekonwertować wszystkie połączone obrazy w dokumencie na osadzone.
1. Otwórz dokument Word zawierający połączone obrazy, które przekonwertujesz na obrazy osadzone. wciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł. A następnie skopiuj poniższy kod VBA do pliku Moduł okno. Zobacz zrzut ekranu:
Kod VBA: konwertuj wszystkie połączone obrazy na osadzone jednocześnie
Sub convert_all_inline_shapes()
'Updated by Extendoffice 20180906
Dim xIShape As InlineShape
For Each xIShape In ActiveDocument.InlineShapes
With xIShape
If .Type = wdInlineShapeLinkedPicture Then
.LinkFormat.SavePictureWithDocument = True
.LinkFormat.BreakLink
End If
End With
Next
End Sub
3. wciśnij F5 klucz do uruchomienia kodu.
Następnie wszystkie połączone obrazy w bieżącym dokumencie są konwertowane na osadzone w tym samym czasie.
Najlepsze narzędzia biurowe
Kutools dla Worda - Podnieś swoje doświadczenie ze słowami dzięki Over 100 Niezwykłe funkcje!
🤖 Kutools Asystent AI: Zmień swoje pisanie dzięki AI - Generuj zawartość / Przepisz tekst / Podsumowanie dokumentów / Zapytaj o informacje na podstawie Dokumentu, wszystko w programie Word
📘 Znajomość dokumentów: Podziel strony / Scal dokumenty / Eksportuj zaznaczenie w różnych formatach (PDF/TXT/DOC/HTML...) / Wsadowa konwersja do formatu PDF / Eksportuj strony jako obrazy / Drukuj wiele plików jednocześnie...
✏ Edycja treści: Znajdź i zamień partii w wielu plikach / Zmień rozmiar wszystkich zdjęć / Transponuj wiersze i kolumny tabeli / Konwertuj tabelę na tekst...
🧹 Łatwe czyszczenie: Wymień Dodatkowe przestrzenie / Podziały sekcji / Wszystkie nagłówki / Pola tekstowe / Hiperłącza / Więcej narzędzi do usuwania znajdziesz na naszej stronie Usuń grupę...
➕ Kreatywne wstawki: Wstawić Tysiące separatorów / Pola wyboru / Przyciski Radio / Kod QR / kod kreskowy / Tabela linii ukośnych / Podpis równania / Tytuł Zdjęcia / Podpis tabeli / Wiele zdjęć / Odkryj więcej w Wstaw grupę...
🔍 Precyzyjne wybory: Punktowy konkretne strony / stoły / kształty / nagłówki akapitów / Ulepsz nawigację za pomocą jeszcze Wybierz funkcje...
⭐ Ulepszenia gwiazd: Nawiguj szybko do dowolnej lokalizacji / automatyczne wstawianie powtarzającego się tekstu / płynnie przełączaj się pomiędzy oknami dokumentów / 11 Narzędzia konwersji...