アクセス2007VBAのクエリのエキスポート

質問

お世話になります。
以下の様にアクセス2007のクエリを
エクセルにエクスポートのVBAを作成したところ
うまく動作しません。
どこか構文が間違ってるのでしょうか？

Private Sub トグル2_Click()

Dim acc1 As String
Dim exce1 As Variant

acc1 = "q_有給付与後"
ecxe1 = "G:\MOCF05602\大信\エクスポートテスト.xlsx"

DoCmd.TransferSpreadsheet acExport, _
acSpreadsheetTypeExcel12Xml, acc1, exce1, True

MsgBox "エクスポート完了★"

End Sub

回答No.1

ushi2015 · ベストアンサー

こんにちは
Option Explicit　宣言してないのですか？
ecxe1 = "G:\MOCF05602\大信\エクスポートテスト.xlsx"
は
exce1 = "G:\MOCF05602\大信\エクスポートテスト.xlsx"
ですよね？

回答No.2

chayamati

こんにちは
DoCmd.TransferSpreadsheet acExport, _
上記の ,と_の間あの空白が全角ではありませんか