Página 1 de 1

Botão imprimir no VBA

Enviado: 12 Set 2018 às 18:57
por 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;

Botão imprimir no VBA

Enviado: 12 Set 2018 às 19:55
por 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