1

我第一次使用stackoverflow,所以这里......

当我尝试在 excel 中运行用于从 CSV 文件中提取数据的宏时,我间歇性地遇到错误。如果我开始一个新的会话,错误通常会消失,但这次它特别持久。它基本上在下面的 .Open 行上出错,给我一个“运行时错误'2147467259'(80004005)未指定错误”:

Public Sub LoadFile()

file_path = Range("FlatFileLocation")

Set oConn = CreateObject("ADODB.Connection")

strcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & file_path & "; Extended Properties=""text;HDR=Yes;FMT=Delimited(,)"";"

oConn.Open strcon

.....

其他信息:

1)我试图访问的文件没有被其他用户打开

2)我在子结束时关闭了我的连接。另外,我刚刚尝试重新启动我的机器,并且在我第一次尝试运行文件时发生了错误

3)当我在没有任何现有插件的情况下打开会话时,它似乎可以工作。有没有办法检查是否存在某种插件冲突?

还有其他帖子建议使用CSVReader。在尝试这条路线之前我的问题是:

1)我可以在多台用户机器上使用这个 CSVReader 吗?我在这里遇到的问题是需要在多台机器上安装它。不过,我也许可以将文件放在共享驱动器上。

2) 我可以用 SQL 字符串查询结果文件吗?目前我使用这样的东西:

....
strsql = "SELECT * FROM ( " & strsql & " ) WHERE ( ABS(PrevRisk) + ABS(CurrRisk) >= " & RiskThreshold & " ) ;"
Set oResult = New ADODB.Recordset
oResult.Open strsql, oConn
....

在此先感谢您的帮助!

4

0 回答 0