Notifications
Clear all

codigo para excluir

3 Posts
3 Usuários
0 Reactions
1,589 Visualizações
(@pedrofish)
Posts: 5
Active Member
Topic starter
 

boa noite
preciso de uma ajuda para criar um codigo para excluir os dados dos clientes
eles estao inseridos na planilha de Base de dados mas tambem estao nas outras alguns dados como o nome e tal
eu precisava de algum codigo que elimina-se o cliente que eu faço a procura na Planilha de dados
so que tambem tem que eliminar nas outras planilhas
eliminando assim a linha a que ele pertence em todas

agradecia uma ajuda

obrigado

pedro ribeiro

 
Postado : 26/12/2019 5:43 pm
(@klarc28)
Posts: 971
Prominent Member
 
Private Sub CommandButton1_Click()
Dim i As Integer
Dim linha As Long
linha = 2
For i = 1 To ThisWorkbook.Sheets.Count
For linha = 2 To Sheets(i).UsedRange.Rows.Count
If Sheets(i).Cells(linha, 1).Value = TextBox1.Text Then

Sheets(i).Cells(linha, 1).EntireRow.Delete
End If


Next linha

Next i
End Sub
 
Postado : 26/12/2019 5:58 pm
(@laerteb)
Posts: 67
Trusted Member
 

Bom dia, pedrofish - Feliz Ano Novo

Amigo, o objetivo do Fórum é o compartilhamento das questões, dúvidas e principalmente das soluções para que
outros que tenham a mesma dúvida possa acompanhar o desenrolar, até a resolução da mesma ;)

Então uma dica muito importante é tu partilhar os arquivos exemplos (Planilhas) aqui no seu Tópico e não em
paralelo fora dele (para não ficar fora do objetivo deste Fórum); o nosso amigo klarc28 fez o correto partilhando o
arquivo exemplo (com a sua solução) :) .

Abraço, Feliz Ano Novo para todos os colegas do Fórum :D .

LaerteB :D

 
Postado : 27/12/2019 7:23 am