Printmacro moet stoppen bij annuleren

[Stagee]

Hallo,

Ik heb een printmacro aangemaakt (dankzij dit forum, dank hiervoor!). Maar wanneer het keuze menu, om aan te geven via welke printer je wilt printen, verschijnt en je dan op annuleren drukt, wordt er toch afgedrukt!

De code is als volgt:

Sub printalles()
'
' printalles Macro
'

'
Sheets(Array("Voorblad", "Inhoudsopgave", "Liquide middelen")).Select
Sheets("Liquide middelen").Activate
Application.Dialogs(xlDialogPrinterSetup).Show
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Weet iemand hier een oplossing voor?

Alvast bedankt

MVG

 

[edmoor]

Maak er dit van:

If Application.Dialogs(xlDialogPrinterSetup).Show Then
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End If

 

[Stagee]

Super bedankt dit werkt perfect!