Compartilhe!

1 - Vamos primeiro verificar os dados de uma tabela:
Você pode ver mais detalhes de como buscar dados do Access clicando aqui.

2 - Depois de buscar os dados verificamos os seguintes dados:
Excel Deletando dados2 - Excel e Access – Deletando Dados no Access pelo Excel via VBA (macro)

3 - Para deletar a linha que contem o Código 4 (Nome=Eu2,Telefone=2) vamos utilizar o código abaixo:

Sub Deletando()
  Dim DataRef As Date
  Dim objCon      As ADODB.Connection
  Dim rs          As ADODB.Recordset
  File = "C:\Temp\Banco de Dados.mdb"
  Codigo = 4
  Set objCon = New ADODB.Connection
  Set rs = New ADODB.Recordset
  strCnxn = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & File & ";"
  objCon.Open strCnxn
  strSQL = "  DELETE FROM [Tabela1] WHERE  [Código] = " & Codigo
  objCon.Execute strSQL
  Set rs = Nothing
  MsgBox "Dados deletados com sucesso!"
End Sub

4 - Pronto agora é só rodar essa macro que apagara o registo com o Código 4.

 

Caso queria esse arquivo, favor enviar um email para atendimento@exceleaccess.com solicitando.

Você também vai gostar:
Excel – Mensagem ao usuário para continuar ou não uma macro via VBA

As vezes o usuário aperta o botão sem querer e roda uma macro sem desejar. Para que isso não aconteça Leia mais...

Excel – Agendar a execução de uma macro automática via VBA

Caso queira agendar uma macro para rodar um certo horário basta usar a função Ontime conforme abaixo: Sub Teste() MsgBox Leia mais...

Excel Avançado – Planilha que busca dados de uma página da internet

Vamos aprender como atualizar sua planilha com dados de uma página da internet. Primeriamente você precisa criar uma consulta. Vai Leia mais...

Excel Avançado – Macro que executa antes de fechar a planilha

Se você deseja rodar um comando antes de fechar sua planilha, coloque o código dentro da macro chamada  “Workbook_BeforeClose" Segue Leia mais...

Obrigado pela visita!

www.exceleaccess.com

contato@exceleaccess.com

www.exceleaccess.com

www.exceleaccess.com

www.exceleaccess.com


Compartilhe!

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *