Excel - Macro para imprimir

[lluffe]

Ólá!!

Preciso muito de uma força. Como eu faço para criar uma macro para que ele imprima da página 1 até a página de acordo com o número de uma determinada célula.

Ex. B1=3

imprimir da página 1 até a página 3

Valeu galera!!!

[Diretor]

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!!

[lluffe]

Valeu!!! Ajudou bastante!! Um abraço!!!