L’icône IMPRIMER dans la barre d’outils STANDARD est pressée rapidement. Souvent alors, plusieurs feuilles de calcul sont imprimées de manière totalement incontrôlable et, surtout, en vain. Ça ne doit pas être. Accédez au préalable à la vue latérale, définissez les marges et ajustez l’impression d’un côté si nécessaire. Pour éviter tout risque, incluez l’événement Workbook_BeforePrint afin que l’utilisateur soit rappelé de cette sauvegarde.

Private Sub Workbook_BeforePrint (Cancel As Boolean)

Dim i As Integer

i = MsgBox _

("Avez-vous vérifié la vue latérale?", _

  vbYesNo, "Print")

If i <> 6 Then Cancel = True: Exit Sub

End Sub

Si l’utilisateur appuie sur le bouton NON, définissez l’argument Cancel sur la valeur True afin de ne pas démarrer le processus d’impression en premier lieu, puis quittez l’événement à l’aide de l’instruction Exit Sub.