无法从VB.NET打开指定的工作表(此代码有什么问题?)

无法从VB.NET打开指定的工作表(此代码有什么问题?),vb.net,excel,Vb.net,Excel,错误/异常: System.InvalidCastException未处理 Message=无法将“System.Boolean”类型的对象强制转换为“Microsoft.Office.Interop.Excel.Worksheet”类型 这个代码有什么问题 提前感谢。激活不会返回工作表(它是子工作表) Private Sub Button11_Click() Dim oXL4 As New Excel.Application Dim oWB4 As Excel.Workbook

错误/异常:

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

这个代码有什么问题


提前感谢。

激活不会返回工作表(它是子工作表)

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
  oSheet4 = oWB4.Worksheets(2)
  oSheet4.Activate()