No.3ベストアンサー
- 回答日時:
http://www.moug.net/faq/viewtopic.php?t=39446
に格好の解説が有るのでは。
ーー
別にイメージ=喩えの話をしてみる。
写真は挿入とは言うが、シートに置かせてもらって、浮いている存在のように思う。その写真の位置は、Top,Lehtの位置を指定できて、別途シートのセルのTop,Leftが捉えられるから、それと関連付けて、繋ぎ止めておく場所はセルに関連付けられるようなイメージです。セルと言う家の門の前に写真を置かせてもらうイメージ。
しかし決して家の中に入りこむ、と喩えられる、セルの属性たる、値やコメントや数式などとは異質の物です。山田さんの家の前においてある写真も、山田さんの家の写真を取り除けと言うわけには行かず、別途何番の写真を取り除けという指示になる。
ーー
2002,2003では
マクロの記録は
Sub Macroi()
ActiveSheet.Pictures.Insert( _
"C:\Documents and Settings\All Users\Documents\My Pictures\Sample Pictures\Sunset.jpg" _
).Select
End Sub
となる。これが2007で動かないかやってみてください。
ーーー
シートに2つの写真を貼り付けると
Sub test01()
Dim shp As Object
For Each shp In ActiveSheet.Shapes
MsgBox shp.Name
Next
End Sub
を実行すると、Picture 1、Picture 2と返る。これが写真のオブジェクトの名前だ。
これで、Picture 2を削除するのは
Sub test02()
ActiveSheet.Shapes(2).Delete
End Sub
名前で指定するなら
Sub test03()
ActiveSheet.Shapes("Picture 2").Delete
End Sub
ーー
上記から、写真以外のオブジェクトがシートに張り付いてないとして
セル番地(Top,Leftで座標的な位置指定に使う)ーPicture番号(オブk\ジェクトの名前)ー写真ファイル名ー内容(何の写真か)
の対応関係を管理しないと行けなくなると思う。
靴の何番の写真を抹消ー>Picture番号(オブジェクト名)ー>上記コードで抹消となり、入れ替える商品の写真については、新たに上記の4要素を管理する必要が出て来る。挿入すると、Picture番号は変わるので厄介だ。
以上2007でもやってみてください。並みのVBAの経験では難しいと思うな。
ACCESSのテーブルにも商品コードなどと対応して、写真を持てる仕組みがあるので、ACCESSの解説書ででも、そちらも勉強してみてください。
に格好の解説が有るのでは。
ーー
別にイメージ=喩えの話をしてみる。
写真は挿入とは言うが、シートに置かせてもらって、浮いている存在のように思う。その写真の位置は、Top,Lehtの位置を指定できて、別途シートのセルのTop,Leftが捉えられるから、それと関連付けて、繋ぎ止めておく場所はセルに関連付けられるようなイメージです。セルと言う家の門の前に写真を置かせてもらうイメージ。
しかし決して家の中に入りこむ、と喩えられる、セルの属性たる、値やコメントや数式などとは異質の物です。山田さんの家の前においてある写真も、山田さんの家の写真を取り除けと言うわけには行かず、別途何番の写真を取り除けという指示になる。
ーー
2002,2003では
マクロの記録は
Sub Macroi()
ActiveSheet.Pictures.Insert( _
"C:\Documents and Settings\All Users\Documents\My Pictures\Sample Pictures\Sunset.jpg" _
).Select
End Sub
となる。これが2007で動かないかやってみてください。
ーーー
シートに2つの写真を貼り付けると
Sub test01()
Dim shp As Object
For Each shp In ActiveSheet.Shapes
MsgBox shp.Name
Next
End Sub
を実行すると、Picture 1、Picture 2と返る。これが写真のオブジェクトの名前だ。
これで、Picture 2を削除するのは
Sub test02()
ActiveSheet.Shapes(2).Delete
End Sub
名前で指定するなら
Sub test03()
ActiveSheet.Shapes("Picture 2").Delete
End Sub
ーー
上記から、写真以外のオブジェクトがシートに張り付いてないとして
セル番地(Top,Leftで座標的な位置指定に使う)ーPicture番号(オブk\ジェクトの名前)ー写真ファイル名ー内容(何の写真か)
の対応関係を管理しないと行けなくなると思う。
靴の何番の写真を抹消ー>Picture番号(オブジェクト名)ー>上記コードで抹消となり、入れ替える商品の写真については、新たに上記の4要素を管理する必要が出て来る。挿入すると、Picture番号は変わるので厄介だ。
以上2007でもやってみてください。並みのVBAの経験では難しいと思うな。
ACCESSのテーブルにも商品コードなどと対応して、写真を持てる仕組みがあるので、ACCESSの解説書ででも、そちらも勉強してみてください。
No.2
- 回答日時:
エクセルのバージョンにもよるかも知れませんが、Excel2007では、
画像ファイルの削除、挿入は、マクロとして記録出来ないようです。
(設定などで変更出来るかも知れませんが、基本的に、すぐにマクロを組んじゃう方なので、以下のようなマクロで対応できます)
# このマクロから派生させて、もっと良いものは作れると思います。
Sub 差し替え()
' シート内にある画像をすべて削除します。
Dim sel As Shape
For Each sel In ActiveSheet.Shapes
If sel.Type = msoPicture Then
sel.Delete
End If
Next
' ファイル名で示される画像を挿入します。
ActiveSheet.Pictures.Insert("ファイル名")
End Sub
このマクロでは、シート内にあるすべての画像を削除してから
指定された画像を挿入する形になります。
上記のselで、sel.AlternativeTextやsel.Nameを使うと、
特定の画像のみを削除することも可能です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) シート間で同じ値があったらコピペ 1 2022/05/08 09:39
- Excel(エクセル) Excel シートに画像が貼ってあり、クリックすると入力シートにジャンプする機能 1 2023/01/14 22:41
- Visual Basic(VBA) エクセルマクロでアニメを作る方法を教えてください。 1 2023/02/07 14:27
- Excel(エクセル) Excelの複数ファイルの複数行を別ファイル1つのシートにVBA、マクロで集約する方法 5 2022/09/13 06:30
- Excel(エクセル) EXCEL マクロで 同じフォルダ内の複数ファイルの複数行全体を選択して1つのファイルに集約 4 2022/09/27 18:41
- Excel(エクセル) エクセルで複数設定したハイパーリンク先を、どれを選んでも画面の左上に来るようにしたいのですが・・・ 3 2022/04/07 16:15
- Excel(エクセル) エクセル バーコード作成で他のシートを参照するには? 2 2023/05/03 16:57
- Excel(エクセル) エクセルのマクロについて教えてください。 3 2023/02/07 14:47
- Excel(エクセル) Excel、同じフォルダ内のExcelファイルの特定シートのみを1つのファイルに集約したい 8 2022/09/07 15:12
- Excel(エクセル) フォルダ内の全ブックのシート名を変更したい 7 2022/09/22 21:34
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【オナニーのおかず】写真見て...
-
高2男子です。最近、お◯にーを...
-
彼女の写真で抜くのはおかしいか
-
これは何ですか? 時々黒い粒が...
-
知り合いの写真で抜いたことは...
-
浮気したい相手に、子供の写真...
-
別に付き合いたいとかはないけ...
-
ラミネートを剥がす方法を教え...
-
「※写真はイメージです。」に決...
-
エクセルに貼付けた写真の容量(...
-
自分の若い頃の写真を見せたが...
-
指名手配や犯人の写真はどこか...
-
PCで G、Hドライブ(Google dri...
-
男の人に聞きます! ラインのア...
-
LINEは交換してくれて毎日話し...
-
黙って写真を撮る夫の心理を教...
-
マッチングアプリで何度か男性...
-
PCに写真移すと回転する
-
先日、スマホに身に覚えのない...
-
中学生です。 ハロートークで仲...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【オナニーのおかず】写真見て...
-
高2男子です。最近、お◯にーを...
-
彼女の写真で抜くのはおかしいか
-
これは何ですか? 時々黒い粒が...
-
知り合いの写真で抜いたことは...
-
ラミネートを剥がす方法を教え...
-
自分の若い頃の写真を見せたが...
-
浮気したい相手に、子供の写真...
-
別に付き合いたいとかはないけ...
-
エクセルに貼付けた写真の容量(...
-
「※写真はイメージです。」に決...
-
好きな女性の写真を欲しがる心...
-
文化祭で写真撮ろ〜と言われた...
-
LINEは交換してくれて毎日話し...
-
元彼女とのエッチ写真を見てし...
-
男の人に聞きます! ラインのア...
-
自分1人が写った写真(自撮りで...
-
男性がLINEで顔写真を送ってと...
-
マッチングアプリで何度か男性...
-
アシダカグモ?が家に出ました...
おすすめ情報