# Re: VB for Excel(如何贴上图档,放在指定的位置)

Posted by 纪文和 on April 20, 1999 at 13:48:52:

In Reply to: VB for Excel(如何贴上图档,放在指定的位置) posted by Gordon on April 20, 1999 at 12:06:37:

: (如何贴上图档,放在指定的位置)

Set appobj = CreateObject("Excel.Application") '启动 Excel
appobj.workbooks.Add '开启新的活页簿
Set shtobj = appobj.ActiveWorkbook.ActiveSheet '使用目前的表格
shtobj.cells(2, 9).Select <--指定位置
shtobj.Pictures.Insert("C:\WINDOWS\Bubbles.bmp").Select <--插入图档

Follow Ups: