Imprimir várias cópias

Com este código abaixo além de permitir imprimir várias cópias da mesma folha, também oferece as opções de selecionar quais as folhas que você deseja.

Abaixo exemplo de código Excel VBA que faz quatro cópias padrão da mesma página

Sub Imprimir_quatro_vezes_mesma_pagina()
   Dim vImpressao_par_padrao As String
   vImpressao_par_padrao = Application.ActivePrinter
   ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=4, Collate:=True

   ' envia para impressora a variável vImpressao_par_padrao
   Application.ActivePrinter = vImpressao_par_padrao
End Sub

Também existe a opção de criar um botão de visualizar antes imprimir