如何將 32 位 VBA 代碼轉換為 64 位 VBA 代碼

Question

我正在嘗試運行一個可以在 32 位（以前可以工作）下運行的宏代碼，但是由於我剛剛升級了我的機器，我使用的是 64 位 Excel 並且此代碼不再起作用。 我需要在 64 位中完成這項工作。 請幫我解決這個問題：

Set AdoConn = New ADODB.Connection
With AdoConn 
     .ConnectionString = “provider=Microsoft.Jet.OLEDB.4.0;Data Source=“ &  strFileSource & “;Persist Security Info=False” 
     .Open
End With

它顯示了 .Open 中的問題

非常感謝。

Answer 1

您可能會發現與 64 位操作系統中的 Microsoft.Jet.OLEDB.4.0（32 位）驅動程序不兼容。

您可以在 64 位操作系統上使用 Microsoft.Jet.OLEDB.4.0（32 位）驅動程序，但您必須強制您的應用程序以 32 位模式構建。

如果您不想或不能這樣做，可以使用 64 位版本的驅動程序 (Microsoft.ACE.OLEDB.12.0)，它適用於 32 位和 64 位操作系統。

嘗試改變：

.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &  strFileSource & ";Persist Security Info=False"

至

.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" &  strFileSource & ";Persist Security Info=False"

如果您的機器上沒有注冊驅動程序，可以從微軟網站下載： https : //www.microsoft.com/en-us/download/details.aspx?id=54920

此外，不僅僅是 4.0 更改為 12.0，“Jet”也更改為“ACE”。