[OfficeVBA] Excel VBA에 MySQL 연동하기 [2편 VBA에 연동]

[OfficeVBA] Excel VBA에 MySQL 연동하기 [2편 VBA에 연동]

 

[OfficeVBA] Excel VBA에 MySQL 연동하기 [1편 odbc 설치 및 확인], http://yyman.tistory.com/314, 2013.07.28 14:40

 

1편에 이어서 계속 진행하겠습니다. 꾸벅;

 

---

1. 사용 방법(2탄)

 

 

Fig 1-1. ODBC 설정하기

 

1. 파란색으로 친 내용을 기억하도록 하자.

    MySQL ODBC 5.1 Driver

 

 

Fig 1-2. Excel 화면

 

2. 엑셀을 키자. Excel VBA를 실행하도록 한다. Alt + F11키

 

 

Fig 1-3. Visual Basic for Application의 도구 / 참조(R) 클릭하기

 

3. 참조를 클릭한다.

 

 

Fig 1-4. 참조 - VBAProject

 

4. Microsoft ActiveX Data Objects 6.1 Library가 있으면 6.1버전으로 선택하고,

없으면 2.8 Library를 선택한다. (낮은 Office버전을 생각한다면 2.8을 선택해도 된다.)

 

 

Fig 1-5) VisualBasic for Application 코드 작성하기

 

 

Sub MySQL연결()

Dim Conn As ADODB.Connection
Dim dbRecset As ADODB.Recordset
Dim sSQL As String

Set Conn = New ADODB.Connection

'MySQL ODBC 5.1 DRIVER 
Conn.ConnectionString = "DRIVER={아까 기억하라고 한거 적어주기};" & _
                        "SERVER=서버주소;" & _
                        "PORT=3306" & _
                        "DATABASE=DB명입력;" & _
                        "UID=사용자계정;PASSWORD=비밀번호;OPTION=3"
                       
Conn.Open

'Localhost -서버주소 실제 서버주소
'포트번호 - 일반적으로 mysql은 3306번 사용
'DB명 입력 -
'계정 입력 - 사용자ID, 비밀번호
End Sub

 

 

5. 묘듈을 하나 생성하고 이와 같이 코드를 입력한다.

 

 

Fig 1-6) Runtime 오류 출력 - Visual Basic for Application

 

6. F5을 누른다.(빌드한다.)

 

Fig 1-6에는 MySQL과 연동을 시도하였을 때, 발생되는 오류 중 하나이다.

문제의 유형에는 크게 "계정, DB, 비밀번호, 포트"의 문제일 가능성이 높다.