Очень новый для любой формы кода. Попытка запустить скрипт в VBA, который будет извлекать данные из базы данных доступа с использованием 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