使用 Excel 的 COM 对象的后期绑定分辨率

Question

以下是使用 VB.net 的 SSIS 脚本任务中

我已经阅读了一些关于这个错误的信息，并且这行似乎有问题： 工作表 = CType(workbook.Sheets(4), Excel.Worksheet)

我的代码如下。我认为对于这里有经验的人来说会很简单。

文本：

Public Sub Main()
       Dim excel As New Excel.Application
        Dim filename As String = "S:\UK\Clients\Direct\xxxxxxx.xls"

    excel.Visible = True
    excel.DisplayAlerts = False

    Dim workbook As Excel.Workbook
    workbook = excel.Workbooks.Open(filename, , False) 'True = ReadOnly

    Dim worksheet As Excel.Worksheet
    worksheet = CType(workbook.Sheets(4), Excel.Worksheet)


    worksheet.Rows(1).delete()








    Dts.TaskResult = ScriptResults.Success
End Sub

Answer 1

在代码顶部添加Option Strict Off，这将允许后期绑定。

要了解早期绑定和后期绑定，请参阅 here

你可以替换这个语句

worksheet.Rows(1).delete()

与

Dim rw As Excel.Range
rw = CType(worksheet.Rows(1), Excel.Range)
rw.Delete()

并在顶部设置 Option Strict On

您的所有代码都将被提前绑定。希望这会有所帮助