Excel Problemas ao importar dados do Excel+VBA para o Access

[Purgg]

Boa tarde! 

Estou tendo problemas para importar dados de uma célula do Excel para o Access com VBA.

A célula em questão é uma data (que esta formatada como data tanto no excel tanto como no access)  sempre que importo os dados para o DB a data não é enviada.

O codigo: 

 

Public Sub isGastos()
    
    
    Worksheets("Inserir despesas").Activate
    
    GerarNumerosAleatoriosSemRepeticao
    
    n_Controle = Cells(8, 2)
    Valor = Cells(12, 7)
    d_Gastos = Cells(15, 7)
    Observacoes = Cells(20, 5)
                      
    Dim lSQL As String
                      
    lsConectar
    lSQL = "Insert into Gastos VALUES ('" & n_Controle & "','" & Valor & "','" & d_Gasto & "','" & Observacoes & "');"
    
    gConexao.Execute lSQL
    lsDesconectar
 
End Sub

Doc.txt

[Basole]

@Purgg voce esqueceu de colocar um (  s ) no nome da variável d_Gastos.

    

 lSQL = "Insert into Gastos VALUES ('" & n_Controle & "','" & Valor & "','" & d_Gastos & "','" & Observacoes & "');"

 

[Purgg]

@Basole Obrigado cara... Olha como é as coisas, passei o dia todo procurando o "erro" e era algo simples... MUITO OBRIGADO kkkkk

[Visitante]

1 hora atrás, Purgg disse:

 ... passei o dia todo procurando o "erro" ...

 

Se você tivesse marcado a opção Requerer declaração de variável o VBA teria apontado o erro logo na primeira tentativa de execução do código.

 

No menu do editor de VBA Ferramentas / Opções / marque a opção citada acima.

Daí em diante no topo de todos os módulos o VBA colocará a expressão Option Explicit .