2011-12-12 7 views
0

나는 MySQL 데이터베이스에서 검색하려고합니다.데이터베이스 VBA에서 가져 오기

Dim oRS as ADODB.Recordset 
    Dim databaseRecords as Range 
    Set oRS = New ADODB.Recordset 
    oRS.ActiveConnection = oConn 
    oRS.Source = "Select AccID from database123" 
    oRS.Open 
    databaseRecords.CopyFromRecordset (oRS) 
    oRS.Close 
    If Not oRS Is Nothing Then Set oRS = Nothing 

나는 이미 mySQL 데이터베이스에 연결되어 있습니다. 연결 부분은 괜찮습니다. databaseRecords.CopyFromRecordset (oRS)에서 "Object variable 또는 With variable set with"오류가 발생합니다. 데이터베이스에 빈 행이 없습니다.

+2

databaseRecords에 아무 것도 지정하지 않았습니다. '.CopyFromRecordSet'을 사용하기 전에 Range에 대한 참조를 보유해야합니다. 그리고 당신은 oRS 주위에 괄호가 필요하지 않습니다. –

+0

이 코드는 VBA 편집기에서 복사하여 붙여 넣었습니까? 아니면 다시 입력 했습니까? 코드를 다시 입력하면 오류를 숨길 수 있으므로 대신 복사하여 붙여 넣으십시오. 또한,'oConn'을 설정하는 코드가 빠져 있습니다. 우리가 그것을 볼 수 없다면, 우리는 무엇이 잘못되었는지를 알 수 없습니다 (Tim이 맞을지라도). – JimmyPena

답변

1

databaseRecords를 (를) 선언했지만 할당하지 않았습니다. 대상 스프레드 시트 내의 기존 (유효한 크기의) 범위에 할당해야합니다.

관련 문제