[Resolvido]Atualizar Tabela automaticamente

Boa noite,
Tenho no meu banco duas tabelas
Base_Importada e crono.
Seria possível a atualização de forma automática da Tabela BASE_IMPORTADA campo LEITURA buscando os dados na Tabela CRONO?

TABELA BASE_IMPORTADA
ID_BASE Situação                    LEITURA
1        20180412201812

TABELA CRONO
ID_CRONO CONC                 LEIT
1                2017013201701 1ª leitura

No campo LEITURA teria que trazer os dados do campo LEIT da tabela crono.

Caros,
Consegui fazer o código, agora o que precisaria saber é como fazer ele rodar automaticamente quando eu gravar dados na Base Importada.
Como executar o ATUALIZA_LEITURA automaticamente.

Bom dia

Teste

No formulario aonde regista novos dados, coloca no evento ao fechar o formulários.

DoCmd.SetWarnings False ' aqui evita o aviso do Access que vai adicionar novos registos
DoCmd.OpenQuery "ATUALIZA_LEITURA"
DoCmd.SetWarnings True ' Aqui volta a ativar os avisos do Access

Bom dia
Quando falo que atualizo o banco, não é através de formulário, mas sim, através de código VBA do Excel.
Tenho os dados em uma planilha e uso um código para importar para o Access.

Uso esse código abaixo

Sub importar_Bo_extraidas()

Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim r As Long
Dim LastRow As Long

strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "\SCTB .accdb"
Set cn = CreateObject("ADODB.Connection")
cn.Open strCon

LastRow = Plan3.Range("A" & Rows.Count).End(xlUp).Row

scn = "[Excel 8.0;HDR=YES;DATABASE=" & ActiveWorkbook.FullName & "]"
strSQL = "INSERT INTO SCTB " _
& "SELECT * FROM " & scn & ".[INTER$A1:K" & LastRow & "]"

cn.Execute strSQL

cn.Close
Set rs = Nothing
Set cn = Nothing

End Sub

Consegui fazer o código com a ajuda do See

Obrigado

Boa tarde

Nas duas primeiras mensagens não se refere ao Excel.

Aqui ninguém tem varinha mágica.

Se está resolvido, então marque como tal.