[[20120519121421]]　『EXCELからクエリーを実行』（Maru）　ページの最後に飛ぶ

『EXCELからクエリーを実行』（Maru）

●処理したい事
EXCELからクエリーを実行し、クエリーの結果をシートへコピーしたい。
エラー：2147467259(80004005)が出て処理が中断します。
（ファイルが見つかりません）
cn.open・・・箇所でデバッグ

Dim myPath As String
Dim myProvider As String
Dim mySrc As String

myPath = "\\**.**.**.**\DATA\処理\Neo.mdb"
myProvider = "Provider=Microsoft.Jet.OLEDB.4.0;"
mySrc = "Data Source=" & myPath & ";"

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset

cn.Open myProvider & mySrc
rs.Open "Q_TH_TAN", cn

Sheets("04T").Range("A2").CopyFromRecordset rs

以上です。
原因を調べていますが、原因がわからず困ってます。
宜しくお願いします。

OS:XP Office:2003

 こちらも回答付かないようなので、初歩的な確認だけですが、
 \\**.**.**.**\DATA\処理\Neo.mdb はエクスプローラから直接パス指定してアクセスする
 ことはできたでしょうか。
 (Mook)

コメント返信：