Este fórum está sendo desativado

[RicardoSouza85]

Boa noite

Tenho uma listbox que é alimentado através de dados inseridos em uma textbox, que depois são transferidos para minha planilha. Preciso que ao inserir um dado que já está na listbox, o programa apresente uma mensagem dizendo o item informado já consta na listbox e não permita continuar.
Consegui fazer essa validação, porém, só funciona para o primeiro item da listbox, mas preciso que valide todos os itens que estão na lista.

Alguém pode me ajudar com essa informação? Estou enviando minha planilha para que fique mais fácil o entendimento.

PS: a informação que não pode se repetir é apenas os dados da terceira coluna da listbox.

Obrigado

[babdallas]

Não consegui entender sua planilha. Mas se você quer verificar se os dados já estão na listbox, mostro um pequeno exemplo:

Código: Selecionar todos

for lin = 1 to listbox.listcount   'Percorre todos os itens de listbox

        if textbox.value = listbox.list(lin,1) then 'Supondo que o dado esteja na primeira coluna 1 da listbox.
              Msgbox "Estes dados já foram lançados!", vbcritical, "Atenção"
              exit sub
        end if
next lin

[RicardoSouza85]

Amigo, obrigado pela ajuda, mas infelizmente não funcionou.

[babdallas]

Veja o arquivo em anexo e veja se ajuda. É um pequeno exemplo.

[RicardoSouza85]

funcionou perfeitamente.. Muito obrigado!!