[[20200730093044]]　『csvファイルオープンエラー』（ゆっくり）　ページの最後に飛ぶ

『csvファイルオープンエラー』（ゆっくり）

c:\testにあるaaa.csvというファイルをVBAで読み込もうとしているのですが、aaa.csvを開くタイミングで以下のエラーが発生しました。

2147417848 : 'Open' メソッドは失敗しました: '_Recordset' オブジェクト

ソースは以下の通りです。

Dim rs As Object
Set rs = CreateObject("ADODB.Recordset")
Dim connectionString As String
connectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\test\aaa.csv Extended Properties=text;HDR=No;FMT=Delimited;"

query = "select count(*) from aaa.csv"
rs.Open query, connectionString, 0　←ここでエラー発生

※実行しているマクロはc:\testの直下にあります。

今までopenメゾットの失敗によるエラーコードは"1004"でしたが、今回は"-2147417848"という見たことないコードでした。
このエラーはどういうときに発生するのでしょうか？

なおこのエラーは一部のPCで発生していて、正常にCSVファイルを開くことができるPCもあります。

なにか情報があればご教授お願い致します。

＜使用 Excel：Excel2013、使用 OS：Windows10 ＞

ACEで駄目な場合は、「Microsoft.Jet.OLEDB.4.0」を使ってみては？

それと、まずはADODB.Connectionで接続してから、ADODB.Recordsetを取得してみては？まとめる事もできますが、そこまで高度な書き方をしている割には、SQLの実行結果を格納していないし…。
（???） 2020/07/30(木) 10:33

ちなみに、ご提示のエラーになるのは、Office関連アプリに異なるバージョンのものが混在しているときに起こりますね。エラーになる人は、ProjectとかVisioの2016以降をインストールしていたりしませんか？

関連アプリは問題ない場合、Accessのインストールの有無が違うとか？
（???） 2020/07/30(木) 10:37

コメント返信：

[ 一覧(最新更新順) ]

[[20200730093044]] 『csvファイルオープンエラー』（ゆっくり） ページの最後に飛ぶ

[[20200730093044]]　『csvファイルオープンエラー』（ゆっくり）　ページの最後に飛ぶ