Sub Retira_Repetidos() Dim QtdeLinhas, x, z As Integer QtdeLinhas = Lst_Historico.ListCount - 1 For x = 0 To QtdeLinhas For z = 0 To QtdeLinha...

Prudencio, obrigado pelo retorno! Achei o código abaixo no site do Tomas, agora preciso adaptar a minha planilha! Se puder ajudar! Vou tentando aqui! ...

Tem como fazer direto?

Valeu Meu Amigo!

Tranquilo Prudencio, não dá para disponibilizar esse arquivo. Fiz o código da maneira abaixo e fucnionou, só que tive que colocar vários IF's! Queria ...

Mas eu preciso gravar SIM E NAO

Funcionou mesmo... estranho... estava dando problema, enfim... desculpa e obrigado pelo retorno meu amigo! Abraços

Será que alguém teria algum exemplo de como fazer um listbox segmentado, de acordo com um critério? Daí eu tento adaptar aqui! Obrigado

JPedro, muitíssimo obrigado! Resolveu sim. PERFEITO! OBRIGADO

Pessoal, boa tarde! O código abaixo está me atendendo, porém, quando eu não lanço nenhuma informação, quando o código manda contar as células que tem...