Boa tarde Marciel, Segue em anexo o que eu queria falar. É o desenho que eu fiz (de uma maneira bem básica), e cada retangulo que forma a figura, mod...

Mauro, Muito Obrigado, funcionou muito bem!

Boa Noite, Acabou que mudei um pouco a minha necessidade: Acredito que com esse novo metódo me farei mais facil de entender. Eu preciso copiar a célu...

Boa tarde Vitor, Eu ainda não consegui fazer que funcione, ficou assim: Sub Colar() Dim ultima As Long ultima = Plan2.Range("E40").End(xl...