>데이터 베이스 >MySQL 튜토리얼 >SQL 레코드 집합에서 데이터를 복사할 때 내 Excel-VBA 코드에 '3704: 개체가 닫혀 있으면 작업이 허용되지 않습니다.' 오류가 발생하는 이유는 무엇입니까?

SQL 레코드 집합에서 데이터를 복사할 때 내 Excel-VBA 코드에 '3704: 개체가 닫혀 있으면 작업이 허용되지 않습니다.' 오류가 발생하는 이유는 무엇입니까?

Linda Hamilton
Linda Hamilton원래의
2024-12-30 20:48:11383검색

Why Does My Excel-VBA Code Get a

SQL 데이터베이스 액세스를 위한 Excel-VBA의 오류 처리

Excel-VBA에서 SQL 데이터베이스에 액세스하는 동안 시도할 때 일반적인 문제가 발생합니다. 레코드 세트의 데이터를 Excel 시트로 복사하면 런타임 오류 3704가 발생합니다. "개체가 다음인 경우 작업이 허용되지 않습니다. 닫혔습니다."

근본 원인:
오류 메시지는 "CopyFromRecordset" 메서드에서 참조된 레코드 집합(objMyRecordset)이 닫혔음을 나타냅니다. 데이터베이스에 대한 연결이 끊어졌거나 레코드세트가 명시적으로 조기에 닫힌 경우 이러한 현상이 발생할 수 있습니다.

해결 방법:
이 문제를 해결하려면 데이터베이스 연결이 안정적이고 레코드세트는 데이터 검색 프로세스 내내 열려 있습니다. 수정된 VBA 코드는 다음과 같습니다.

Sub GetDataFromADO()
    'Declare variables'
        Set objMyConn = New ADODB.Connection
        Set objMyRecordset = New ADODB.Recordset
        Dim strSQL As String

    'Open Connection'
        objMyConn.ConnectionString = "Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=MyDatabase;User ID=abc;Password=abc;"
        objMyConn.Open

    'Set and Execute SQL Command'
        strSQL = "select * from myTable"

    'Open Recordset'
        Set objMyRecordset.ActiveConnection = objMyConn
        objMyRecordset.Open strSQL

    'Copy Data to Excel'
        ActiveSheet.Range("A1").CopyFromRecordset objMyRecordset

    'Close recordset and connection (optional, to ensure no open object handles)
        objMyRecordset.Close
        objMyConn.Close
End Sub

주의:
"Close" 메서드(레코드 집합과 연결 개체 모두에 대해)를 데이터 다음에 사용해야 한다는 점에 유의하는 것이 중요합니다. -잠재적인 오류를 방지하기 위해 검색 프로세스가 완료되었습니다. 그러나 서브루틴이 종료되면 자동으로 닫혀야 하므로 이러한 개체를 명시적으로 닫을 필요는 없습니다.

위 내용은 SQL 레코드 집합에서 데이터를 복사할 때 내 Excel-VBA 코드에 '3704: 개체가 닫혀 있으면 작업이 허용되지 않습니다.' 오류가 발생하는 이유는 무엇입니까?의 상세 내용입니다. 자세한 내용은 PHP 중국어 웹사이트의 기타 관련 기사를 참조하세요!

성명:
본 글의 내용은 네티즌들의 자발적인 기여로 작성되었으며, 저작권은 원저작자에게 있습니다. 본 사이트는 이에 상응하는 법적 책임을 지지 않습니다. 표절이나 침해가 의심되는 콘텐츠를 발견한 경우 admin@php.cn으로 문의하세요.