2011-12-12 6 views
0

mySQLデータベースから取得しようとしています。データベースからの取り出し

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 

私は既にmySQLdatabaseに接続しています。接続部分は問題ありません。 databaseRecords.CopyFromRecordset(oRS)に "Object variableまたはWith変数が設定されていません"というエラーが表示されます。データベースには空の行がありません。

+2

databaseRecordsに何も割り当てられていません。 '.CopyFromRecordSet'を使う前に、Rangeへの参照を保持する必要があります。そして、あなたはoRSの周りに括弧を必要としません。 –

+0

このコードはVBAエディタからコピーされ貼り付けられますか、それとも再入力しましたか?コードを再入力するとエラーを隠すことができます。コピーして貼り付けてください。また、 'oConn'を設定しているコードが見つからない場合は、何が間違っているのかわかりません(おそらくTimは正しいかもしれませんが)。 – JimmyPena

答えて

1

あなたはdatabaseRecordsを宣言しましたが、割り当てられていません。ターゲットスプレッドシート内の既存の(有効なサイズの)範囲に割り当てる必要があります。

関連する問題