|
自Bookに対してADOアクセスする時の宿命みたいなもののような気がしますが...
OSとExcelのバージョンは何でしょう?
2007以降だったらProviderに"Microsoft.ACE.OLEDB.12.0"を使うと良いと思います。
2003でも『2007 Office system ドライバ: データ接続コンポーネント』をダウンロードすれば使えます。
tp://www.microsoft.com/ja-jp/download/details.aspx?id=23734
ODBC接続だと
objADO.Open "Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};" & _
"DBQ=" & ThisWorkbook.FullName & ";" & _
"ReadOnly=0"
objADO.Close
OLEDBでは
objADO.Provider = "Microsoft.ACE.OLEDB.12.0"
objADO.Properties("Extended Properties") = "Excel 12.0"
objADO.Properties("Data Source") = ThisWorkbook.FullName
objADO.Open
objADO.Close
|
|