Выполните SQL-запрос с помощью VBA и заполните лист данными

Question

Выполните SQL-запрос с помощью VBA и заполните лист данными

Очень новый для любой формы кода. Попытка запустить сценарий в VBA, который будет извлекать данные из базы данных access с использованием SQL и помещать их в электронную таблицу Excel. Код аналогичен приведенному ниже. Работает чисто, но я не знаю, как использовать данные, которые он извлекает. Заранее спасибо.

Sub Get_Data()
Dim cn As Object
Dim rs As Object
Dim strFile As String
Dim strCon As String
Dim strSQL, strInput As String

strFile = "S:Location.Database.accdb"

strCon = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & strFile

Set cn = CreateObject("ADODB.Connection")
cn.Open strCon

strInput = InputBox("Input Desired Name")

strSQL = "SELECT NAME, Location WHERE NAME =""'strInput'"";"

cn.Execute strSQL

cn.Close
Set cn = Nothing

End Sub

sql vba

автор: