Powerpoint で作った絵を Wordに貼り付けて行内に変換するマクロ(From Wordpress)

Wordで絵を書く選択肢もあるのですが

私はPowerpointで絵を書いて、それをWordに拡張メタ型式で貼り付けてます。

それが多少早くできるように型式を拡張メタで指定して貼り付けて

貼り付けた後の画像を行内の位置するように変換するスクリプト

これを個人用マクロファイルなどに貼り付けて

ショートカットキーを設定すると便利。

Ctrl+Shift+Vとかにしてます。

Selection.PasteSpecial Link:=False, DataType:=wdPasteEnhancedMetafile, _
Placement:=wdFloatOverText, DisplayAsIcon:=False
ActiveDocument.Shapes.Item(ActiveDocument.Shapes.Count).Select
Selection.ShapeRange.ConvertToInlineShape

via WordPress http://neverberepeated.info/?p=624&utm_source=rss&utm_medium=rss&utm_campaign=powerpoint-%25e3%2581%25a7%25e4%25bd%259c%25e3%2581%25a3%25e3%2581%259f%25e7%25b5%25b5%25e3%2582%2592-word%25e3%2581%25ab%25e8%25b2%25bc%25e3%2582%258a%25e4%25bb%2598%25e3%2581%2591%25e3%2581%25a6%25e8%25a1%258c%25e5%2586%2585%25e3%2581%25ab%25e5%25a4%2589%25e6%258f%259b%25e3%2581%2599%25e3%2582%258b%25e3%2583%259e