티스토리 뷰
반응형
참조 - 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)
'Write
'xRange = "TEST"
xworkbook.Close()
xls.Quit()
End Sub
반응형
'IT > Visual Basic (.Net)' 카테고리의 다른 글
[VB.NET] MS-SQL TABLE SELECT INERT UPDATE (0) | 2018.03.12 |
---|---|
[VB.NET] SQL 연결하기, DB 연결하기, Database 연결 (0) | 2018.03.12 |
[VB.NET] Print List 가져오는 방법, 프린트 설정 [PrintDialog] (0) | 2017.03.29 |
VB.NET Find Last Row in an Excel Sheet / 엑셀 마지막 행 구하기 (0) | 2016.07.21 |
[Visual Basic] 문자열 함수, 문자열함수, format, string (0) | 2016.07.04 |
공지사항
최근에 올라온 글
최근에 달린 댓글
- Total
- Today
- Yesterday
링크
TAG
- 리니지M
- 군산
- 먹어본다
- 레시피
- Pokemon Go
- 익산맛집
- 햄스터
- mssql
- 익산
- 부송동
- 전주
- 식샤를합시다
- 아인스타이늄
- 데이트
- ms-sql
- 아이폰
- M포인트
- 차박
- 전북
- 캠핑
- 맛집
- 후기
- 도미넌트
- 왕자크림
- 카페
- 생생정보 황금레시피
- 맥주
- 비트코인
- 황금레시피
- c#
일 | 월 | 화 | 수 | 목 | 금 | 토 |
---|---|---|---|---|---|---|
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 |
글 보관함