Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Excluir da planilha pelo Listbox, usando duas colunas como critério

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
alxnc2008
Acabou de chegar
Acabou de chegar
Mensagens: 5
Registrado em: Seg Jan 14, 2019 6:50 pm

Excluir da planilha pelo Listbox, usando duas colunas como critério

Mensagem por alxnc2008 »

Olá Pessoal, espero que todos estejam bem, enrosquei para excluir itens da planilha pelo listbox, nesse metodo que estou usando ele apenas usa uma coluna para critério de comparação, no meu caso tá pegando a coluna 0 da list e a G da planilha, mas vou ter nomes repetidos as vezes, precisaria ter pelo menos 3 colunas de critério, segue o comando.
Dim Resp As Integer
Resp = MsgBox("Confirma Exclusão?", vbYesNo, "Excluir")
If Resp = vbYes Then
Planilha5.Select
Planilha5.Range("G1").Select

For i = 0 To (ListBox1.ListCount - 1)
If ListBox1.Selected(i) = True Then
Cod = ListBox1.List(i, 0)
With Worksheets("BASE1").Range("G:M")

Set C = .Find(Cod, LookIn:=xlValues, Lookat:=xlWhole)
If Not C Is Nothing Then
C.Select
Selection.EntireRow.Delete
ListBox1.Selected(i) = False

End If
End With
End If
Next
End If

Tentei mudar na linha "Cod=ListBox1.List(i, 0) " tentei acrescentar ([i, 0],[i,1])
não deu certo, alguma ideia ai pessoal?
Obrigado!


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
LaerteB
Colaborador
Colaborador
Mensagens: 96
Registrado em: Qui Out 19, 2017 8:20 am

Re: Excluir da planilha pelo Listbox, usando duas colunas como critério

Mensagem por LaerteB »

Boa tarde, alxnc2008

A explicação acima ficou um pouco confuso (sem um modelo).. desta forma para ajudá-lo com maior rapidez e eficácia, é
muito importante você anexar uma planilha de exemplo com dados (fictícios) e que não seja o projeto
inteiro (com o trecho que está com dificuldades); explicando com as informações necessárias para
alcançar o seu objetivo (se necessário incluir imagens elucidativas)..

Aguardamos a sua resposta e a Planilha exemplo ;) ...

LaerteB :)


Responder