excel读取控件

Question

比如我想在该excel的model中读取其中某一页的textbox中的值
能调用么？
Worksheets(“sheet1”).textbox名。。貌似不能用。急

Answer 1

'C:\1.Xls 文件中的 Sheet1 工作本中有一个 TextBox1 的文本框.
'以下代码调试通过.
Option ExplicitPrivate Sub Form_Load()
 Dim xlApp As New Excel.Application
 Dim xlWork As Excel.Workbook
 Dim xlSheet As Object '注意此处
 
 Set xlWork = xlApp.Workbooks.Open("C:\1.xls")
 Set xlSheet = xlWork.Worksheets("Sheet1")
 MsgBox xlSheet.textbox1.Text
  
End Sub