Boa tarde, No caso então, use o gravador de macro (já selecionando as opções desejadas de impressão) e substitua o código no final. att,

Boa noite Jscopa, Olhe nas mensagens. De qualquer forma, troque o código que coloquei anteriormente por esse: Sub LevarValores() Dim WsM ...

Boa tarde cmbruno, Não entendi a sequência, explique mais detalhadamente. att,

Boa tarde, Veja o código que está no módulo2 da planilha em anexo. Estou supondo que sempre os valores vão partir da célula A6. att,

Não, esse arquivo que você colocou é o postado por Romanha. O que eu postei tem o módulo1, é nele que você deve testar. No caso, só acrescentei uma t...

Boa noite tiaotkd, Olhando por cima, acredito que inicialmente você precise de duas planilhas: Uma para cadastro dos alunos e outra para o controle f...

Boa tarde kayomaster, No arquivo que anexei, substitua o código no módulo1 por esse aqui: Sub Copiar_E_Imprimir() ThisWorkbook.Activat...

Boa tarde, Não entendi. Explique mais, também anexe um planilha mostrando como seria o começo e o fim. Outra coisa, já que você está começando no VB...

PELICHIERO, Se nada funciona, simplesmente delete tudo e comece de novo. Se você não está disposto a escrever qual é o seu problema e o que você que...

Anexe um arquivo de exemplo, assim fica mais fácil ajudar.

Boa dia, Duas páginas por folha? Você quer copiar valor de outra aba também? Range("B9").Select e Range("D12").Select, selecion...

Bom dia, Na hora de jogar os valores nas células, experimente usar o comando: Format( Valor, "dd/mm/yyyy") att,

Boa noite, Uma sugestão é copiar os valores para uma outra planilha e imprimir. Dê uma olhada no código que está no módulo1. att,

Boa noite Silva, Anexe os número em uma planilha, assim fica mais fácil ajudar. Outra coisa, o que seria 'a sequência de números que esta faltando'?...

Boa noite, Você precisar fazer algo similar o que montei. Dê uma olhada no código que está no Botão de Comando do UserForm1. Qualquer dúvida é só pe...