VBA数据形式值

Question

您好我有2个工作表，并使用一个作为表单，一个作为数据表

 Dim DataWks As Worksheet
 Dim InputWks As Worksheet

 Set InputWks = Worksheets("Sheet3")
 Set DataWks = Worksheets("Sheet1")

在表单 - InputWks上，它有一个名为tbRiskContext

的oleobject

我希望将其值放在Datawks中 - 名为Database的Range中的数据表 在单元格（2,2）

我可以通过

将值放在范围内

ActiveSheet.Range("DataBase").Cells(2, 2) = "it works"

但是如何从oleobject获取值进入Cell（2,2）

有什么想法吗？

Answer 1

尝试以下方法：

With DataWks
   .Cells(2, 2) = InputWks.OLEObjects("tbRiskContext").Object.Value
End With