VB.NET EXCEL LAST COLUMN, VB 엑셀 마지막 컬럼 구하기

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 lColumn As Long = 0 xWorkbook = xls.Workbooks.Open("E:\1234512345.xls") 'File Location xWorksheet = xWorkbook.Sheets(1) With xWorksheet If xls.WorksheetFunction.CountA(.Columns) 0 Then lColumn = .Columns.Find(What:="*", _ After:=.Range("A1"), _ Loo..
IT/MS-SQL 2016. 9. 9. 11:15
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..
IT/Visual Basic (.Net) 2016. 7. 21. 16:01
VB.NET EXCEL Read, Write / VB.NET 엑셀 읽고, 쓰기

참조 - COM - Microsoft Excel 14.0 object Library 사용하면 됩니다!! 없으면 하위버젼도 상관없어요!! Private Sub excel() 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 xworkbook = xls.Workbooks.Open("E:\12345.xls") xworksheet = xworkbook.Sheets(1) xRange = xworksheet.Range("A1") xlotno = xRange.Value 'Read MsgBox(xlotno) '..
IT/Visual Basic (.Net) 2016. 7. 20. 15:08
1
공지사항
최근에 올라온 글
최근에 달린 댓글
Total
Today
Yesterday
링크
TAG more
«   2025/01   »
일 월 화 수 목 금 토
1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30 31
글 보관함