Синтаксическая ошибка в предложении FROM Excel VBA в rs.open

Question

Я пытаюсь импортировать набор данных из доступа в Excel через макрос.Я получаю вышеупомянутую ошибку в строке, где он открывает набор записей.Пытаюсь решить, но безуспешно.Нашел этот вопрос ( Синтаксическая ошибка в предложении FROM Excel VBA ), но его ответ не решает мою проблему.Пожалуйста, помогите.

Sub importAccessdata()

    Dim cnn As ADODB.Connection

    Dim rs As ADODB.Recordset

    Dim sQRY As String


    Dim strFilePath As String

    strFilePath = "Path"

    Set cnn = New ADODB.Connection

    Set rs = New ADODB.Recordset


    cnn.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=" & strFilePath & ";"

    sQRY = "select * from tableName"


    With rs
        .CursorLocation = adUseClient

        .Open Source:=sQRY, ActiveConnection:=cnn,CursorType:=adOpenForwardOnly, LockType:=adLockOptimistic, Options:=adCmdText
    End With

    Application.ScreenUpdating = False

    ThisWorkbook.Sheets(1).Range(“A1”).CopyFromRecordset rs

    rs.Close

    Set rs = Nothing

    cnn.Close

    Set cnn = Nothing

    Exit Sub

End Sub