Wordで埋め込みVisioオブジェクトをすべて選択するにはどうすればよいですか?
Word文書に複数の埋め込みVisioオブジェクトが含まれている場合、1つずつ選択するのは面倒です。このチュートリアルでは、文書内のすべての埋め込みVisioオブジェクトを迅速に選択するための2つの方法を紹介します。
VBAを使用してすべての埋め込みVisioオブジェクトを選択する
Kutools for Wordを使用してすべての埋め込みVisioオブジェクトを選択する
Wordのおすすめ生産性向上ツール
Kutools for Word: AI 🤖を統合し、100 以上の高度な機能で文書処理時間を50%短縮します。無料ダウンロード
Office Tab: ブラウザのようなタブをWord(およびその他のOfficeツール)に導入し、複数の文書間での移動を簡素化します。無料ダウンロード
VBAを使用してすべての埋め込みVisioオブジェクトを選択する
各埋め込みVisioオブジェクトを手動で選択する代わりに、VBAマクロを使用してすべてを迅速に選択できます。以下はその方法です:
- Alt + F11 を押して、Microsoft Visual Basic for Applications ウィンドウを開きます。
- 「挿入」>「モジュール」をクリックし、次のコードをモジュールウィンドウに貼り付けます:
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
- 「実行」をクリックします
ボタンを押すか、または F5 キーを押してコードを実行します。
Office Tab: Word、Excel、PowerPointにタブインターフェースを提供します。![]() |
今すぐワークフローを強化しましょう。Office Tabについてさらに詳しく 無料ダウンロード |
Kutools for Wordを使用してすべての埋め込みVisioオブジェクトを選択する
マクロの使用に不安がある場合や、より簡単な方法を好む場合、Kutools for Wordはワンクリックソリューションを提供します。Select Embedded Visio Object Paragraphs機能を使用すると、文書内のすべてのVisioオブジェクトを即座に選択できます。
- Kutools > 段落(「選択」グループ内)> 埋め込みVisioオブジェクトを持つ段落を選択 をクリックします。
注意: このツールを使用する前に文書の一部を選択している場合、その選択範囲内の埋め込みVisioオブジェクトのみが選択されます。
最高のオフィス生産性ツール
Kutools for Word - Wordの体験を100以上の素晴らしい機能で向上させましょう!
🤖 Kutools AI機能: AIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ (形式を保持) / スーパー トランスレート (形式を保持) / AI編集 / AI校正...
📘 文書のマスタリー: ページの分割 / 文書の結合 / 様々な形式で選択をエクスポート (PDF/TXT/DOC/HTML...) / 一括PDF変換...
✏ 内容の編集: 複数ファイルにわたる一括検索と置換 /すべての画像をリサイズ / 表の転置 / 表をテキストに変換...
🧹 簡単なクリーンアップ:余分なスペース / セクション区切り / テキストボックス / ハイパーリンクを一掃 / その他の削除ツールは削除グループへ...
➕ 創造的な挿入: 千の区切りを挿入 / チェックボックス / ラジオボタン / QRコード / バーコード / 複数の画像 / 挿入グループでさらに発見...
🔍 精密な選択: 特定のページ / 表 / 図形 / 見出し段落を特定 / より多くの 選択 機能でナビゲーションを強化...
⭐ スター強化: 任意の場所に移動 / 繰り返しテキストを自動挿入 / 文書ウィンドウ間を切り替え /11 の変換ツール...

最高のオフィス生産性ツール
Kutools for Word - 100+ Word用ツール
- 🤖 Kutools AI機能: AIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ / スーパー トランスレート / AI編集 / AI校正
- 📘 文書のマスタリー: ページの分割 / 文書の結合 / 一括PDF変換
- ✏ 内容の編集: 一括検索と置換 /すべての画像をリサイズ
- 🧹 簡単なクリーンアップ:余分なスペースを削除 / セクション区切りを削除
- ➕ 創造的な挿入: 千の区切りを挿入 / チェックボックスを挿入 / QRコードを作成