Este fórum está sendo desativado

[Alexhp]

Boa noite

Criei um botão de impressão a qual eu defino a quantidade impressões em uma determinada celula eu desejo , porem gostaria que toda vez que eu apertasse o botão ele clicasse no botão.

Ex: coloquei que preciso de 10 impressões com isso quando eu apertasse o botão pra rodar a macro ele clicasse no botão 10 vezes;

[fcarlosc2018]

Boa-noite !

Código: Selecionar todos

Sub imprimir1()

'ncop = InputBox("Informe a quantidade de cópias")
ncop = 10

If ncop = "" Or ncop = "0" Then
   'MsgBox ("Impressão Cancelada !")
Exit Sub
End If

Application.ScreenUpdating = True
Range("A1").Select
Application.ScreenUpdating = False
ActiveWindow.SelectedSheets.PrintOut Copies:=ncop

End Sub

Código: Selecionar todos

Sub Imprimir2()
    
    Range("A1:E5").Select
    ActiveWindow.SelectedSheets.PrintOut Copies:=10, Collate:=True, _
        IgnorePrintAreas:=False
        
End Sub