디버깅하는 남자

--SEARCH TABLE select TEST01, TEST02 from TEST_001 --INSERT VALUES insert into TEST_001 values ('A','A') insert into TEST_001 values ('B','B') insert into TEST_001 values ('C','C') insert into TEST_001 values ('D','D') insert into TEST_001 values ('E','E') insert into TEST_001 values ('C','F') insert into TEST_001 values ('C','G') --QUERY declare @TEST_VAL varchar(50) declare @VAL varchar(50) de..

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..