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 – Cálculo Automático ou Manual via VBA

Para alternar entre cálculo automático ou manual via VBA, basta usar os seguintes comandos: Para automático: Application.Calculation  = xlCalculationAutomatic Para manual: Leia mais...

Excel – Menu do Excel 2003 no Excel 2007

Se ainda não se acostumou com a mudança do layout do Excel rode o código abaixo que  adicionará o menu Leia mais...

Excel e Access – Gravando Dados do Excel no Access via VBA (macro)

Excel e Access – Gravando Dados do Excel no Access via VBA (macro) 1 – Primeiro você deve criar uma 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 *