Archives de la catégorie : Divers

Parfois, ce sont les choses les plus évidentes que l'on oublie !

Voici la question d'un lecteur : "Comment créer une macro pour visualiser l'aperçu avant impression et l'ajouter à la barre d'accès rapide ?".

[Edit] comme indiqué par kris et elhassan dans les commentaires, le plus rapide est sans doute les touches deraccourci CTRL + F2 et CTRL + P.

La réponse pourrait être cette macro :
Sub apercu()
Application.Dialogs(xlDialogPrintPreview).Show
End Sub

Mais beaucoup plus simplement, il suffit d'ajouter le bouton d'aperçu avant impression :
Tout d'abord, affichez et ensuite personnalisez la barre d'accès rapide, via un clic droit sur le ruban :

Puis, sélectionnez Toutes les commanes, Aperçu avant impression et vous l'ajoutez à votre barre :

Et voilà !

Cordialement

Gaetan Mourmant

Suite à une question d'un utlisateur, voici le calendrier modifié pour qu'il soit opérationnel sur les tableaux :

Téléchargez le calendrier ici.

.

A bientôt.

Gaetan

Voici un petit code qui est très pratique pour afficher toutes les feuilles d'un classeur :

Sub affiche_Toutes_Les_Feuilles()
  Dim wks As Worksheet
  For Each wks In ThisWorkbook.Worksheets
    wks.Visible = True
  Next
End Sub

En espérant qu'il vous soit très utile !

Note : pour masquer une feuille, clic droit sur la feuille et choisir masquer.

Gaëtan