Boa noite, Jnexcel Segue um exemplo do meu trabalho. avgsantos

Bom dia, Fjovanio Utilize o código abaixo, veja se atende o seu problema, basta trocar as ranges conforme seu critério. Sub Selecionar() Dim lRo...

Boa tarde, Wagner Excelente trabalho, obrigado mais vez amigo! avgsantos

Boa noite, Wagner Ficou excelente trabalho, só mais um detalhe quando eu seleciono primeiro cliente irá trazes todas as ocorrência e transportará par...

Boa tarde, Douglas Segue um exemplo pesquisado da net. avgsantos

Boa tarde, Andre Utilize o código abaixo para iniciar a setfocus na txt_fantasia Private Sub Frame2_Click() Txt_Fantasia.SetFocus End Sub avgsantos

Boa noite, Veja se o modelo abaixo se atenda. avgsantos

Boa noite, Andre Segue o arquivo editado conforme solicitado. avgsantos

Boa tarde, Eufrásio Segue o modelo editado conforme solicitado. avgsantos

Boa tarde, Wagner Excelente, funcionou perfeitamente, valeu avgsantos

Boa tarde, Wagner Segue anexo. avgsantos

Boa noite, gilbertjrs Temos mais uma opção para remover itens repetidos, utilizar o código abaixo. Sub Remove_Repetido_Nome() Application.Scree...

Boa noite, Pessoal Solução resolvida segue o código. Dim indice Plan2.Select indice = ListBox1.ListIndex + 3 'Verifica qual a lin...

Boa noite, Leandro Isso mesmo, na planilha consegui até excluir 1 linha da listbox na aba "box" e automaticamente irá transferir os dados e...

Boa noite, Pessoal Não consegui encontrar o código para adaptar no formulário, seria possível quando digitar a segunda letra apagar o filtro da comb...