无法从VB.NET打开一个特定的工作表（这段代码有什么问题？）

Question

Private Sub Button11_Click()
    Dim oXL4 As New Excel.Application
    Dim oWB4 As Excel.Workbook
    Dim oSheet4 As Excel.Worksheet
If ComboBox10.Text = "abc" Then
    oWB4 = oXL4.Workbooks.Open("D:\blah\blah\Def.xlsx")
    oSheet4 = oWB4.Worksheets(2).Activate
    oXL4.Visible = True
    oXL4.UserControl = True
End If
End Sub

错误/例外：

System.InvalidCastException未处理   Message =无法将“System.Boolean”类型的对象强制转换为“Microsoft.Office.Interop.Excel.Worksheet”。

此代码有什么问题？

提前致谢。

Answer 1

激活不返回工作表（它是子工具）。

  oSheet4 = oWB4.Worksheets(2)
  oSheet4.Activate()