エクセルのマクロを使用してワードの機能を実行する事は可能でしょうか、可能であればその方法を教えて下さい。
例えばマクロ名:ワードとして
このマクロを実効すると下記の内容のワード機能を操作したいです、
操作したいワード機能「校閲→比較」
旧図書保存先:C:\Users\〇〇\Desktop\更新図書\2023年度\旧図書
ファイル名:北海道
新図書保存先:C:\Users\〇〇\Desktop\更新図書\2023年度\新図書
ファイル名:北海道
ワードの比較をクリックし
画面左側にC:\Users\〇〇\Desktop\更新図書\2023年度\旧図書
ファイル名:北海道
画面右側にC:\Users\〇〇\Desktop\更新図書\2023年度\新図書
ファイル名:北海道
と表示し、画面の一番左側に差分の表示が出来るようにしたいです。
この画面が表示されたらマクロは完了です。
いかがでしょうか。可能ですか?
エクセルとワードを今使用しているVersionは2010ですが、これは試験的に自宅で設定しており実際は会社での使用になり、VersionはOffice365にて使用します。
よろしくお願いします。
No.5ベストアンサー
- 回答日時:
最低限の回答になるかと思いますが、こちらでいかがでしょうか。
(セキュリティの設定が必要な場合は、ウェブサイトの情報をご参考ください)Cドライブの直下に「work」フォルダがあり、その中に Excel-file.xlsm と Word-file.docm がある例。それぞれのファイルには、次のマクロを記述します。
■Excel-file.xlsm のマクロ
Sub ExcelからWordファイルを起動()
Dim WordApp As Object
Set WordApp = CreateObject("Word.Application")
WordApp.Visible = True
Set WordDoc = WordApp.Documents.Open("C:\work\Word-file.docm")
End Sub
■Word-file.docm のマクロ
※ファイルを開いた瞬間にマクロが実行されます。
Private Sub Document_Open()
Dim tmp As Long
With Application
tmp = .RecentFiles.Maximum
.RecentFiles.Maximum = 0
.Dialogs(wdDialogToolsCompareDocuments).Show
.RecentFiles.Maximum = tmp
End With
End Sub
No.2
- 回答日時:
ご存じだとは思いますが、マクロを編集する準備の一例をお伝えします。
なお「開発」タブを表示させるには、「ファイル」メニューから「オプション」に進み、「リボンのユーザー設定」を選んだあと、「開発」にチェックを入れてください。スクリプトは先ほど参考にあげたページより転載しました。
お望みのマクロについては、考えてみますのでお待ちください。
No.1
- 回答日時:
2つの文書を比較するWordマクロ
https://www.ka-net.org/blog/?p=4734
こちらにヒントがありそうです。
エクセル小僧さんがお望みなのは、特定のフォルダに入った、特定のファイルの比較でしょうか。
そのフォルダやファイルは、その都度変更になりますか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) ワードのマクロについて教えてください。 1 2023/01/21 16:01
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/02 11:48
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/07/01 12:54
- Excel(エクセル) PDFファイルに日付を名前にして保存したい。 エクセル2019でワークシートに請求書のフォームを作り 2 2023/05/27 11:13
- Excel(エクセル) 【マクロ】エラーが発生⇒実行時エラー58既に同名のファイルが存在 5 2022/08/31 10:03
- その他(Microsoft Office) ワードのマクロについて教えてください。 1 2023/01/22 11:43
- Excel(エクセル) Excelのマクロについてご教授ください 2 2023/02/25 09:43
- Excel(エクセル) 1つのファイルを3つのフォルダにファイル名を【明日の日付】にして、コピーをしたい 2 2022/12/21 17:43
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/04/17 13:07
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/21 09:28
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
レポートの宿題は、pdf化の指示...
-
PDFがすべてワードに変わってます
-
課題でワード2枚程度と言われ...
-
LINEのオプチャですが、はじか...
-
ワードパッドで囲み線を付けた...
-
ワードを保存したときにズレる...
-
ワードアートの挿入で数行書く...
-
バチクソって言葉がマイブーム...
-
iPhoneで禁止ワードを検索でき...
-
WORDマクロで特定文字から別文...
-
ワードの文章をメールで送る方法
-
グーグルドライブでワードが崩れる
-
ワードアートで文字を下に半円...
-
ワールドパットって?
-
ワードを閉じるときの保存について
-
ワードの背面や前面
-
ワードやPDFへのリンクの貼り方
-
ワードパッド
-
.mso拡張子の判別・変換ソフト
-
2010以降のエクセルでワードア...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
レポートの宿題は、pdf化の指示...
-
PDFがすべてワードに変わってます
-
ワードを保存したときにズレる...
-
ワードパッドで囲み線を付けた...
-
LINEのオプチャですが、はじか...
-
グーグルドライブでワードが崩れる
-
課題でワード2枚程度と言われ...
-
iPhoneで禁止ワードを検索でき...
-
バチクソって言葉がマイブーム...
-
ワードで日本地図を作製したも...
-
ワードアートの挿入で数行書く...
-
画像データ(tif)をワードに貼...
-
Wordが使えません。
-
ワードがワードパッドになって...
-
ワードパットで表をつくりたい
-
ワードの文章をメールで送る方法
-
ワードのアクセス権
-
ワードで作成した画像を保存す...
-
ChemDrawについて
-
エクセルのマクロについて教え...
おすすめ情報
回答ありがとう御座います。
私が使用しているパソコンのWindowsが低くテキストエディタに対応して居ない為、確認出来ませんが会社のパソコンで行ってみたいと思います。
私の希望は特定のフォルダに入った、特定のファイルの比較のみです。
同じフォルダ内には複数のファイルが有りますが、
混乱するため、ファイル毎にマクロを設定したいと考えております。
参考になります、助言等頂けましたら幸いです。
よろしくお願いします。
回答ありがとう御座います。
はい、おっしゃる通りExcelのファイルに設定したマクロから、Word文書を操作(比較)したいです。
貴者の支持通りにワードにマクロ
Public Sub ShowCompareDocumentsDlg()
'文書の比較ダイアログ表示
Dim tmp As Long
With Application
tmp = .RecentFiles.Maximum
.RecentFiles.Maximum = 0 '文書を選択しやすくするため一時的に履歴クリア
.Dialogs(wdDialogToolsCompareDocuments).Show
.RecentFiles.Maximum = tmp
End With
End Sub
を設定しました。
私の希望をよろしくお願いします。
ありがとう御座います。
エクセル側の設定は完了出来ました。
よろしくお願いします。