No.1ベストアンサー
- 回答日時:
こんにちは。
オートシェイプを画像ファイルとして保存するのは通常操作で可能です。
ファイル→Webページとして保存 を使います。
Webページとして保存を行うとファイル名.filesという名前のフォルダが作成され、その中に画像ファイルが出来ます。
ただし、この操作を「マクロの記録」で記録しても直接画像ファイルにする記述が記録されるわけではありません。
結果として出来上がると言うことなので、マクロで使うとすれば出来上がった画像ファイルをコピーしてどこかに取り出してからファイルを削除する、という方法になるかと思います。
どうでしょうか。
確認遅れて申し訳ございません。
Webページ保存という形でマクロの記録ですがやってみました。
Sub Macro1()
ActiveSheet.Shapes.AddShape(msoShapeRectangle, 147#, 134.25, 74.25, 43.5). _
Select
ActiveSheet.Shapes.AddShape(msoShapeRectangle, 188.25, 200.25, 86.25, 40.5). _
Select
ActiveSheet.Shapes.AddShape(msoShapeRectangle, 268.5, 132.75, 72.75, 50.25). _
Select
ActiveSheet.Shapes.AddShape(msoShapeOval, 208.5, 79.5, 45.75, 45.75).Select
ActiveSheet.Shapes.Range(Array("Rectangle 1", "Rectangle 2", "Rectangle 3", _
"Oval 4" _
)).Select
Selection.ShapeRange.Group.Select
ChDir "T:\"
'↓HTML方式で保存 FileFormat:=xlHtml
ActiveWorkbook.SaveAs Filename:="T:\htmlSave.htm", FileFormat:=xlHtml
End Sub
で、T:\htmlSave.files\image001.gifが出来るのでそれをコピーするなりすればいいですね。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【VBA】マクロの入ったファイル...
-
VBScript ワードunicodeテキス...
-
MSXML2によるファイル保存の最...
-
サポートされたファイル形式お...
-
e-taxで送信ファイルの拡張子が...
-
VBSで動画ファイルの時間を読み...
-
iPhoneの内蔵の記憶媒体は、HDD...
-
シェイプ上で矢印キー(右、左...
-
PC内で速度を遅くした音源をCD...
-
個別に違う添付ファイルを付け...
-
PDFファイルの倍率を変えて保存...
-
ダウンロードしたファイルの容...
-
Fortniteのクラッシュについて
-
【至急】エクセル プルダウンを...
-
エクセルで「特定の文字を含む...
-
ファイル数と合計サイズの取得方法
-
ビデオファイルのプロパティの...
-
garagebandのLR Mixの方法について
-
Googleマップに保存した地点が...
-
エアコンの冷媒 R410Aの重...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【VBA】マクロの入ったファイル...
-
VBSでファイルを指定のフォルダ...
-
WebBrowserにHTMLテキストを読...
-
eclipseの保管が押せない!
-
エクセルでファイルを閉じるボ...
-
EXCEL/VBAでWORDファイル名の先...
-
JavaScript でファイル保存を行...
-
ダブルクォーテーション付きの...
-
VBScript ワードunicodeテキス...
-
リストボックスの保存方法を教...
-
Emacsで保存ができない
-
UWSCでエクセルファイルのみを...
-
HTMLでアンカーをはりPowerPoin...
-
VB 2005 色データの保存、読出...
-
python文字化けエラーが発生し...
-
jQueryのダウンロードについて
-
フォルダの中にある複数のFlash...
-
サーバー側のエクセル形式ファ...
-
オートシェイプを画像ファイル...
-
EZWEBの着FLASHでmmf...
おすすめ情報