VB.NET Find Last Row in an Excel Sheet / 엑셀 마지막 행 구하기

Dim xls As New Excel.Application Dim xWorkbook As Excel.Workbook Dim xWorksheet As Excel.Worksheet Dim xRange As Excel.Range Dim xlotno As String Dim lRow As Long = 0 xWorkbook = xls.Workbooks.Open("E:\1234512345.xls") 'File Location xWorksheet = xWorkbook.Sheets(1) With xWorksheet If xls.WorksheetFunction.CountA(.Cells) 0 Then lRow = .Cells.Find(What:="*", _ After:=.Range("A1"), _ LookAt:=Excel..

2016.07.21