Excel VBA引用工作表上的InkPicture

Question

我已经完成了一些相当简单的Excel和VBA项目，但对OLEObjects还是很陌生（新手！）。 经过一些研究，我设法使用VBA将InkPicture放置在Excel工作表（“ Sheet1”）上（以下代码）

ActiveSheet.OLEObjects.Add(ClassType:="msinkaut.InkPicture.1", Link:=False, DisplayAsIcon:=False, Left:=ActiveCell.Left, Top:=ActiveCell.Top, Width:=240, Height:=70).Select

有谁知道如何使用VBA访问（嵌入式）InkPicture属性和方法？

非常感谢 ：）

Answer 1

尝试这个

Dim yourObject As OLEObject
Set yourObject = ActiveSheet.OLEObjects.Add(ClassType:="msinkaut.InkPicture.1", Link:=False, DisplayAsIcon:=False, Left:=ActiveCell.Left, Top:=ActiveCell.Top, Width:=240, Height:=70)