通用Excel表间取数公式

通用Excel取数公式

Sub 提取信息()

Dim obj As Object

Set obj =

https://www.360docs.net/doc/d911994582.html,AddIns.Item("prjAddin.Office_Addin").Object obj.execFormula "提取公式"

Set obj = Nothing

End Sub