https://lil.la/technology/post-2133
上記のサイトを参考にxlsxとxlmsにファイルを分割して
SQLでxlsx内の検索を行おうとしていますが接続時にエラーとなり、うまく動作しません。
何分エラーの詳細も不明なためどの様に対処していいか分からない状態です。
すいませんが解決策をご教示いただけないでしょうか。
VBA
1 2 Dim cn As Object 3 Dim rs As Object 4 Dim strSQL As String 5 Dim strWhere As String 6 Dim targetFile As String 7 8 Set cn = CreateObject("ADODB.Connection") 9 Set rs = CreateObject("ADODB.Recordset") 10 targetFile = "C:\Users\test\Desktop\test\data.xlsx" 11 12 With cn 13 .Provider = "Microsoft.ACE.OLEDB.12.0" 14 .Properties("Extended Properties") = "Excel 12.0;HDR=No;IMEX=1" 15 .Open targetFile 16 End With 17
.Open targetFileの箇所で該当のエラーが出力されます。
すいませんがよろしくお願いいたします。
回答3件
あなたの回答
tips
プレビュー