Segue em Anexo. Quaseee.xlsm Quaseee.xlsm

Obrigado a todos ! Consegui! Tive que arrumar o Case 8 e 46 ( BackSpace e Delete) para 'ActiveCell.ClearContents' , assim consegui utilizar ambos dent...

Mauro! Muito bom este seu exemplo! Ajudou bastante! O meu único ploblema agora ficou que não consigo transformar os valores em código sem que a célula...

Uuuuhuu, estamos quase lá! Hahahaha! Boa a dica sobre a Caixa de listagem! Agora consigo arrumar a lista para o tamanho que eu quero e vincular ela a ...

Não me resolveu : Eu precisava que a própria caixa (a que esta inserida a listagem ao clicar) aumentasse. """" A verdade é que eu...

Cara não consegui abrir o teu arquivo em anexo. Tem como mandar ele em outro formato ? ou passar a fórmula ? Obrigado!