Olá pessoal, estou criando uma rotina de inserção de alguns dados numa tabela dentro do SQL SERVER, a partir do Excel, e estou com um problema ( que acredito ser de sintaxe do código).
Quando mando executar o código, é gerada o erro: " O Comando de texto não foi definido para o objeto de comando". Ao mandar depurar, o erro está no código:

Rst.Open SrtRst, Cnx

.
Alguem poderia me ajudar com isso?

Sub Export_to_SQL()

'Declaração das Variáveis de conexão com o banco de dados
Dim Cnx As New ADODB.Connection
Dim Rst As New ADODB.Recordset
Dim StrCnx, StrRst As String
Dim Contador As Integer
Dim Linha_Entrada As Integer
Dim SrtRst As String


StrCnx = "Provider=SQLOLEDB;Data Source=nb-bhn-631;Initial Catalog=Banco_Dados_HFaria;Integrated Security=SSPI;"

Cnx.Open StrCnx
Linha_Entrada = 2

Do While Planilha2.Range("A" & Linha_Entrada) <> ""

REPRESENTANTE = Planilha2.Range("A" & Linha_Entrada)
COMISSAO = Planilha2.Range("B" & Linha_Entrada)


StrRst = "INSERT INTO tab_Cad_Rep(REPRESENTANTE,COMISSAO) VALUES('" & REPRESENTANTE & "'" & "," & "'" & COMISSAO & "'" & ")"

Rst.Open SrtRst, Cnx

Linha_Entrada = Linha_Entrada + 1

Loop


End Sub