Visibleは使えないのでしょうか？

質問

オフィス２０１０です。
アクセスｖｂａでエクセルのデータを操作したいので

Sub test()

Set cnEx = CreateObject("ADODB.Connection")

With cnEx
.Provider = "Microsoft.ACE.OLEDB.12.0"
.Properties("Extended Properties") = "Excel 12.0"
.Properties("Data Source") = "C:\Users\test.xlsm"
.Open
.Visible = True 'エラーになる
End With

End Sub

と言うコードを作ったのですが
.Visible = Trueで

実行時エラー　446
オブジェクトは名前付き引数をサポートしていません。

と言うエラーが発生します。

Visibleは使えないのでしょうか？

回答No.1

oboroxx · ベストアンサー

cnExはアプリケーションではないので.Visibleは使えないと思います。
Set cnEx = CreateObject("Excel.application")
なら、.Visibleは使えるのですが、ここはエクセルのデータファイルよりデータを抽出したいのだろうと思うので、Excel.applicationを使う必要はないのでしょうから、.Visibleは要らないと思います。

頑張ってください。

お礼

ありがとうございました。