Problemas VB6 + Excel + SQL

Boa tarde !!!

Estou com um problema ao acessar uma planilha excel (via VB6) utilizando SQL.

Encontro o seguinte erro:

Err.Description = [Microsoft][Driver ODBC para Excel] Parâmetros insuficientes. Eram esperados 1.

Err.Number = -2147217904

O código é:

Set rstExcel_Rede = New ADODB.RecordsetrstExcel_Rede.CursorLocation = adUseClientrstExcel_Rede.CursorType = adOpenKeysetrstExcel_Rede.LockType = adLockBatchOptimistic AQUI GERA O ERRO rstExcel_Rede.Open "SELECT FROM [plan1$] where NomeArqSAP = '" & rstExcel_SAP(0) & "'", _"DRIVER=Microsoft Excel Driver (.xls);DBQ=" & DirBox_Comparacao_Rede.Path & "\" & Nome_Arquivo_Rede, adOpenDynamicPior de tudo é que eu tenho um código idêntico, no mesmo form e que funciona corretamente. http://forum.imasters.com.br/public/style_emoticons/default/upset.gif http://forum.imasters.com.br/public/style_emoticons/default/cry.gif

Alguem pode me ajudar?! ^_^

Abraços!!