F
Famu
Guest
Bonjour,
Comment mettre un temps de pause entre deux instruction :
Sheets('4041').Select
If Range('A4') > 0 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
TEMPS de PAUSE : 1 seconde
Sheets('4042SK').Select
If Range('A4') > 0 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
etc...
Encore un grand merci à ce Forum,
Famu.
Comment mettre un temps de pause entre deux instruction :
Sheets('4041').Select
If Range('A4') > 0 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
TEMPS de PAUSE : 1 seconde
Sheets('4042SK').Select
If Range('A4') > 0 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
etc...
Encore un grand merci à ce Forum,
Famu.