Ir ao conteúdo
  • Cadastre-se

Excel - Macro para imprimir


lluffe

Posts recomendados

:-BEER:bandeira::-BEER

Fala amigo!!

Segue aí:

*****************************************************************

Sub Botão3_Clique()

Dim W As Integer

W = Range("A1").Value

ActiveWindow.SelectedSheets.PrintOut From:=1, To:=W, Copies:=1, Collate:=True

End Sub

*****************************************************************

"W " é a nossa variável, a qual será alimentada pela célula A1.

"to:=W" é a página final, informada pelo valor da variável "W".

Ponha este exemplo e faça testes...

Espero ter ajudado...

Abraços!!

:-BEER:bandeira::-BEER

Link para o comentário
Compartilhar em outros sites

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...