Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

6676 / 76734

←次へ　｜　前へ→


	【75657】Re:画像の一括挿入

γ - 14/6/6(金) 21:50 -


	引用なし

	パスワード

焦点を絞って質問して下さい。

ActiveSheet.Pictures.Insert(strFolder & Me.ListBox1.List(i)).Select
のところが不明なのですか？　　　　
　 With ActiveSheet.Pictures.Insert(Filename:=myFileName)
　　　 .Top = ActiveCell.Top
　　　 .Left = ActiveCell.Left
　 End With
を参考にして書き換えるということですか？
フォルダ名と（"\"を間にはさんで）ファイル名を連結したパス名を
引数に与えればよいと思います。
そして、
画像のtop位置をアクティブセルのtop位置に合わせ、
画像のLeft位置をアクティブセルのLeft位置に合わせるという処理を
すればいいわけですよね。

ActiveCellが正しくセットされているのか、
そもそもどこにセットしたいのか、など説明がないので、
さっぱり解りません。そこは問題ないんですね？

8 hits

▼

【75653】画像の一括挿入 ちゃぷ 14/6/5(木) 20:22