Come convertire tutte le immagini collegate in immagini incorporate in un documento Word?
Quando invii un documento Word contenente immagini collegate ad altri, le immagini potrebbero mancare e verranno visualizzate nel computer del destinatario come mostrato nello screenshot sottostante. Come convertire tutte le immagini collegate in immagini incorporate in una volta sola prima di inviarle? Questo articolo fornisce un metodo VBA per gestire la situazione.
Converti le immagini collegate in incorporate con il codice VBA
Converti le immagini collegate in incorporate con il codice VBA
Applica il seguente codice VBA per convertire tutte le immagini collegate in un documento in immagini incorporate.
1. Apri il documento Word che contiene le immagini collegate che desideri convertire in immagini incorporate. Premi i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.
2. Nella finestra Microsoft Visual Basic for Applications, clicca su Inserisci > Modulo. Dopodiché, copia il seguente codice VBA nella finestra Modulo. Vedi screenshot:
Codice VBA: Converti tutte le immagini collegate in incorporate in una volta sola
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. Premi il tasto F5 per eseguire il codice.
Tutte le immagini collegate nel documento corrente vengono quindi convertite in immagini incorporate contemporaneamente.
I migliori strumenti per la produttività in ufficio
Kutools for Word - Eleva la tua esperienza su Word con oltre 100 funzioni straordinarie!
🤖 Funzionalità AI di Kutools: Assistente AI / Assistente in Tempo Reale / Super Lucida (Mantieni Formato) / Super Traduci (Mantieni Formato) / Redazione AI / Correzione AI...
📘 Maestria del Documento: Dividi Pagine / Unisci Documenti / Esporta Intervallo in vari formati (PDF/TXT/DOC/HTML...) / Conversione in batch in PDF...
✏ Modifica del Testo: Trova e Sostituisci in batch su più file / Ridimensiona tutte le Immagini / Trasponi Righe e Colonne della Tabella / Converti Tabella in Testo...
🧹 Pulizia senza sforzo: Elimina Spazi Extra / Interruzioni di Sezione / Casella di testo / Collegamenti ipertestuali / Per altri strumenti di rimozione, visita il gruppo Rimuovi...
➕ Inserimenti Creativi: Inserisci Separatore delle Migliaia / Casella di Controllo / Pulsante di Opzione / Codice QR / Codice a Barre / Immagini multiple / Scopri di più nel gruppo Inserisci...
🔍 Selezioni Accurate: Individua Pagine Specifiche / Tabelle / Forma / Paragrafo di Intestazione / Migliora la navigazione con altre funzioni di Seleziona...
⭐ Miglioramenti Speciali: Vai a qualsiasi Intervallo / Inserimento automatico di testo ripetitivo / Passa tra Finestre dei Documenti /11 strumenti di Conversione...
🌍 Supporta oltre40 lingue: Usa Kutools nella lingua che preferisci – Inglese, Spagnolo, Tedesco, Francese, Cinese, e più di altre40 lingue!

✨ Kutools for Office – Una sola installazione, cinque strumenti potenti!
Include Office Tab Pro · Kutools per Excel · Kutools per Outlook · Kutools for Word · Kutools for PowerPoint
📦 Ottieni tutti e5 gli strumenti in un'unica suite | 🔗 Integrazione perfetta con Microsoft Office | ⚡ Risparmia tempo e aumenta subito la produttività
I migliori strumenti per la produttività in ufficio
Kutools for Word - 100+ strumenti per Word
- 🤖 Funzionalità AI di Kutools: Assistente AI / Assistente in Tempo Reale / Super Lucida / Super Traduci / Redazione AI / Correzione AI
- 📘 Maestria del Documento: Dividi Pagine / Unisci Documenti / Conversione in batch in PDF
- ✏ Modifica del Testo: Trova e Sostituisci in batch / Ridimensiona tutte le Immagini
- 🧹 Pulizia senza sforzo: Rimuovi Spazi Extra / Rimuovi Interruzioni di Sezione
- ➕ Inserimenti Creativi: Inserisci Separatore delle Migliaia / Inserisci Casella di Controllo / Crea Codici QR
- 🌍 Supporta oltre40 lingue: Kutools parla la tua lingua – oltre40 lingue supportate!