用ＶＢ控制Ｅｘｃｅｌ中 的ｐｉｃｔｕｒｅ！！

Question

請問大蝦, 如何用ＶＢ在Ｅｘｃｅｌ中指定的位置上添加一個ｐｉｃｔｕｒｅ！！ 
    能對添加的圖片進行長寬的控制 !

Answer 1

Private Sub Command1_Click()
Dim app As Excel.Application
Set app = CreateObject("Excel.Application")
app.Visible = True
    
app.Workbooks.Open "c:\aa.xls"app.Sheets("Sheet1").Select
app.ActiveSheet.Shapes.AddShape(msoShapeRectangle, 201.75, 80.25, 78.75, 63).Select
End Sub

Answer 2

当然用VBA啦，，找我联系啦，，
[email protected]

Answer 3

Open "\Curr " For Input As #1
为何打不开同目录下名为Curr的文件