質問: excelにj-peg画像を一括挿入できるマクロ。 複数のj-pegをexcelに挿入したいのですがどなたかご教授願います。貼り付けはj-peg加工になっていることが理想です(bmpやgifではなく)
回答: 例えば、c:\に ph000001.jpg ph000002.jpg ph000003.jpg ph000004.jpg ph000005.jpg の5つのファイルがあって、それを順に挿入する場合 sub macro1() dim t as string dim n as string for i = 1 to 5 f = i + 1000000 t = right(f, 6) n = "c:\ph" + t + ".jpg" cells(i * 10, 1).select activesheet.pictures.insert(n).select next i end sub のようなマクロではどうなのでしょうか。