![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.1ベストアンサー
- 回答日時:
s-holmesさんこんにちは。
私も、Wordのvbaは扱うことがないのですが、今回挑戦してみました。
まず、ドキュメント上に、”コントロールツールボックス”のメニューボタンからコマンドボタンを選択して貼り付けます。デフォルトの名前が"CommandButton1"になると思いますが、このボタンを右クリックして、立ち上がるVBEのイベントプロシージャに以下のようなコードを記述しました。
Private Sub CommandButton1_Click()
Dim myf As String
myf = "ここに画像ファイルまでのパスとファイル名を入れる"
With ActiveDocument
For i = 1 To .Shapes.Count
.Shapes(i).Fill.UserPicture myf
Next i
End With
End Sub
一応、Word2000にて動作確認しています。
この回答へのお礼
お礼日時:2001/04/19 06:16
おおお!出来ました。ちょっと感動だ。
スクリプトの意味はなんとなくわかるという程度ですが、これを機会に少しは勉強してみたいです。ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) PowerPoint VBA で画像の鮮明度を変更する方法がわかりません 2 2023/03/24 13:34
- ホームページ作成・プログラミング サイトの同じページに画像を複数挿入し、それぞれの画像に別リンクを貼ることはできますか? 初心者なので 1 2022/08/04 11:46
- Excel(エクセル) Excel 表の作成について 3 2022/06/16 12:15
- その他(Microsoft Office) マイクロソフトオフィス 5 2023/07/29 14:31
- Excel(エクセル) 2列のエクセルの表を変更したい 6 2022/07/01 11:19
- Word(ワード) 至急です。画像を貼り付けたいのですがワードで挿入するとこんな風になります。なぜなのでしょうか。知って 2 2022/06/07 17:10
- Visual Basic(VBA) Excel(VBA) 特定の条件に該当する行の値、書式を同じセルにコピ&ペーストしたいです 1 2022/05/21 18:18
- Excel(エクセル) エクセル シート内のボックスを縦並びから横並びに 7 2023/04/05 04:28
- Visual Basic(VBA) tatsumaru77様 昨日回答して頂いたものです。 すみませんが、昨日の質問で1つ補足があります 1 2022/05/15 15:06
- Visual Basic(VBA) Vba テキストボックスでボックスのサイズ超えると文字列入力できない 2 2022/05/20 08:09
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBAでmeに相当するもの...
-
Excel VBAで、実行時にsheet上...
-
エラー内容が分かりません
-
ワードVBAで画像を挿入
-
アクセス カンレンダーコント...
-
エクセル終了時の保存確認メッ...
-
エクセルでツールバーに「縮小...
-
コピーしたファイルのマクロを...
-
昨日まで動いていたエクセルの...
-
エクセルの指数を無効にしたい
-
VBA マクロ実行時エラー’1004Ra...
-
フォルダ内の全ブックのシート...
-
excelファイルに使われているVB...
-
ExcelVBAで今開いているユーザ...
-
複数のデータ系列の線の太さを...
-
VBAを一度起動するとずっと出て...
-
AccessからExcelマ...
-
excelのマクロ実行でブロックさ...
-
【Excel VBA】ブックを複数開い...
-
ファイル名を今日の日付、時刻...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBAでmeに相当するもの...
-
Excel VBAで、実行時にsheet上...
-
エラー内容が分かりません
-
コモンダイアログエラー
-
オプションボタン
-
EXCEL VBA テキストボックスの...
-
キーボードでコマンドボタンを...
-
EXCEL VBA カレンダーコントロ...
-
アクセス カンレンダーコント...
-
ワードVBAで画像を挿入
-
フォルダ内の全ブックのシート...
-
複数のデータ系列の線の太さを...
-
エクセル終了時の保存確認メッ...
-
エクセルでツールバーに「縮小...
-
ファイル名を今日の日付、時刻...
-
VBAを一度起動するとずっと出て...
-
cellsで特定の離れた範囲を選択...
-
エクセルVBA Workbook変数に変...
-
エクセルの指数を無効にしたい
-
【マクロ】その時、その時で変...
おすすめ情報