Hoe selecteer je alle ingesloten Visio-objecten in Word?

Als uw Word-document meerdere ingesloten Visio-objecten bevat, kan het een voor een selecteren ervan vervelend zijn. Deze handleiding introduceert twee methoden om u te helpen alle ingesloten Visio-objecten snel te selecteren in een document.

Selecteer alle ingesloten Visio-objecten met VBA

Selecteer alle ingesloten Visio-objecten met Kutools voor Word

Selecteer alle ingesloten Visio-objecten met VBA

In plaats van elk ingesloten Visio-object handmatig te selecteren, kunt u een VBA-macro gebruiken om ze allemaal snel te selecteren. Zo gaat u te werk:

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.
2. Klik op Invoegen > Module en plak de volgende code in het modulevenster:

   Sub SelectAllEmbedWordObject()
   Dim tempTable As InlineShape
   Application.ScreenUpdating = False
   ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
   For Each tempTable In ActiveDocument.InlineShapes
       If InStr(tempTable.OLEFormat.ProgID, "Visio") = 1 Then
           tempTable.Range.Paragraphs(1).Range.Editors.Add wdEditorEveryone
       End If
   Next
   ActiveDocument.SelectAllEditableRanges wdEditorEveryone
   ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
   Application.ScreenUpdating = True
   End Sub

3. Klik op Uitvoeren of druk op F5 om de code uit te voeren.

Office Tab: Voegt tabbladinterfaces toe aan Word, Excel, PowerPoint...

Verbeter uw workflow nu.Meer informatie over Office Tab Gratis downloaden

Selecteer alle ingesloten Visio-objecten met Kutools voor Word

Als u zich niet op uw gemak voelt bij het gebruik van macro's, of gewoon een eenvoudigere manier verkiest, biedt Kutools voor Word een oplossing met één klik. Met de functie Selecteer Alineas met Ingesloten Visio-objecten kunt u direct alle Visio-objecten in uw document selecteren.

1. Klik op Kutools > Paragrafen (in de groep Selecteren) > Selecteer Alineas met Ingesloten Visio-objecten.

   

Beste productiviteitstools voor kantoor

Kutools voor Word – Til uw Word-ervaring naar een hoger niveau met meer dan 100 indrukwekkende functies!

🤖 Kutools AI-functies: AI Assistent / Realtime Assistent / Super Pools (Formaat behouden) / Super Vertalen (Formaat behouden) / AI Redactie / AI Proeflezen...

📘 Documentbeheersing: Pagina’s splitsen / Documenten samenvoegen / Selectie exporteren in diverse formaten (PDF/TXT/DOC/HTML...) / Batch converteren naar PDF...

✏ Inhoud bewerken: Batch Zoeken en Vervangen in meerdere bestanden / Alle afbeeldingen formaat wijzigen / Rij- en kolomindeling van tabellen transponeren / Tabel naar tekst converteren...

🧹 Moeiteloos opschonen: Verwijder extra spaties / sectie-eindes / tekstvakken / hyperlinks / Voor meer verwijderopties, ga naar de groep Verwijderen...

➕ Creatieve invoegingen: Voeg duizendtallen-scheidingstekens toe / selectievakjes / keuzerondjes / QR-code / barcode / meerdere afbeeldingen / Ontdek meer in de groep Invoegen...

🔍 Nauwkeurige selecties: Selecteer specifieke pagina’s / tabellen / vormen / kopalinea’s / Verbeter de navigatie met meer Selecteer -functies...

⭐ Ster-upgrades: Navigeer naar elke locatie / Automatisch herhalende tekst invoegen / Wissel tussen documentvensters /11 conversietools...

👉 Wilt u deze functies uitproberen? Download Kutools voor Word nu! 🚀

Gratis downloaden     Nu kopen     Meer informatie over Kutools voor Word

 

Beste productiviteitstools voor kantoor

Kutools voor Word – 100+ tools voor Word

• 🤖 Kutools AI-functies: AI Assistent / Realtime Assistent / Super Pools / Super Vertalen / AI Redactie / AI Proeflezen
• 📘 Documentbeheersing: Pagina’s splitsen / Documenten samenvoegen / Batch converteren naar PDF
• ✏ Inhoud bewerken: Batch Zoeken en Vervangen / Alle afbeeldingen formaat wijzigen
• 🧹 Moeiteloos opschonen: Verwijder extra spaties / Verwijder sectie-eindes
• ➕ Creatieve invoegingen: Voeg duizendtallen-scheidingstekens toe / Voeg selectievakjes toe / Maak QR-codes

Gratis downloaden Nu kopen Meer informatie over Kutools