Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
  • ベストアンサー

MS-Wordのマクロで図の書式設定をする方法を教えて下さい。

MS-Wordのマクロで図の書式設定をする方法を教えて下さい。 印鑑代わりにEPSデータを貼り付けるマクロを作成したいのですが、書式設定を制御するマクロが良くわかりません(オートマクロでは出来ませんでした。やり方が悪いのかも…)。設定したい書式はレイアウト→折り返しの種類と配置→前面、になるようにしたいのです。 宜しくお願い致します。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

以下のようなことでしょうか。 下記モジュールを実行すると図挿入ダイアログが表示され、選択した 図がいったん「行内」で挿入した後に、自動的に「前面」になります。 Private Sub 図挿入()  Dim i, j  i = ActiveDocument.InlineShapes.Count + 1  j = ActiveDocument.Shapes.Count + 1  Dialogs(wdDialogInsertPicture).Show  On Error Resume Next  ActiveDocument.InlineShapes(i).ConvertToShape  ActiveDocument.Shapes(j).Select  Selection.ShapeRange.WrapFormat.Type = 3  Selection.ShapeRange.ZOrder 4 End Sub Word2000環境下ですので、新しいバージョンでも有効かどうかは わかりません。

Xinn44
質問者

お礼

ありがとうございます。まさにこれです。 しかもダイアログを開いて選択できるところまで付けて頂いて誠にありがとうございます。 また何かありましたら宜しくお願い致します。

すると、全ての回答が全文表示されます。

関連するQ&A