Se disponibilizar um modelo fica facil

Ve se consegue ajustar a sua necessidade. viewtopic.php?f=10&t=18995 Não é exatamente o que vc procura mas tem 2 exemplos vc pode tentar adaptar...

Disponibilize um arquivo modelo fica mais facil ajudar

Eu posso estar errado mas acho que isso funciona if activecell.value = "." then exit sub else activecell.offset(0,1).select end if

Neste exemplo seu o loop nao demora muito mais que 3 segundos, vale a pena reduzir esse tempo? Se fosse algo de 100000 linhas ate seria justificavel,...

Mais simples que duas linhas de codigo?????????? O Local a ser salvo vai ser escolhido durante a execução ou vai ser salvo sempre no mesmo local pre ...

Existem algumas maneiras de "dificultar", mas impedir é perca de tempo, sempre vai existir alguem com conhecimento para quebrar as possiveis...

Ve se assim atende sua necessidade.

Sendo assim qual o nome do arquivo e onde vc quer salvar?? VC quer escolher isso sempre ou quer decidir na hora que tiver executando o codigo.

Uma coisa que nao ficou claro foi o seguinte vc vai criar o XLSX e depois o PDF??? E isso mesmo??? E necessario??? Vai precisar do XLSX para algum...

O codigo que esta no exemplo que postei esta fazendo exatamente o que vc acabou de descrever, o que acontece é que o processo é muito rapido e imperce...

Era so trocar o Call Copiar de lugar.... Colocando antes do if assim Call Copiar If Worksheets("cross").Range("D9") = "Ok...

De novo um exemplo pratico passo a passo. Vai digitar o que na planilha que tem o botao??? E qdo a informação coincidir vai preecher o que na ficha?...

E para preencher as celulas em amarelo, com todas as linhas da tabela que esta em plan2. Na planilha apresentada qdo preencher as 23 colunas vai fazer...

Agora quem nao entendeu foi eu... Posta um exemplo O que vc quer dizer com isso A minha duvida é mesmo por cada clic no botão fazer aparecer ou d...