vb.net - 从 VB.NET 查找 Excel 中的最后一行

Question

我正在尝试学习如何在 VB.Net 中与 Excel 电子表格进行通信，并发现 Siddharth Rout 的一些主题非常有帮助。但是，当我尝试查找使用的最后一行时，我收到以下错误消息:

An unhandled exception of type 'SystemMissingMemberException' occurred in Microsoft.VisualBasic.dll Additional information: Public member 'xlapp' on type 'Range' not found

当我运行以 lRow = 开头的行时发生错误

非常感谢帮助

我的代码包括

Imports System.Data.OleDb
Imports Excel = Microsoft.Office.Interop.Excel
Imports Microsoft.Office.Interop.Excel
'~~> Define your Excel Objects
Dim xlApp As New Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlWorkSheet As Excel.Worksheet

'   Find the LAST row with data in Column A
lRow = xlWorkSheet.Range("A" & xlWorkSheet.Rows.Count).xlapp.xlUp.Row
MsgBox("The last row which has data in Col A of Sheet1 is " & lRow

Answer 1

尝试使用下面的代码，通过它你可以获得使用的行数

lRow=ActiveSheet.UsedRange.Rows.Count