Hi. Did you refresh your Nav Pane?
Just checked that the table is getting created in SQL server instead of MS Access
Below is my code
Private Sub btnGetData_Click()
Dim dbMain As New ADODB.Connection ' Declaring the Connection
Dim rs As New ADODB.Recordset ' Declaring the Recordset
Dim strSQL As String ' Declaring a simple variable
dbMain.Open "Provider=sqloledb;Server=test;Database=DemoTest;uid=u1234;pwd=p1234;Trusted_Connection=no"
strSQL = "SELECT policynumber into SanTest FROM Test123"
Dim adoCmd As New ADODB.Command
adoCmd.ActiveConnection = dbMain
adoCmd.CommandText = strSQL
adoCmd.Execute
End Sub