Code VBA pour le bouton d'impression dans Excel (5 exemples)

  • Partage Ça
Hugh West

Si nous pouvons définir un bouton d'impression personnalisé dans notre feuille de calcul Excel, l'impression des feuilles peut être très conviviale et nous faire gagner du temps. Macros VBA Cet article vous propose donc 5 macros simples à utiliser. VBA code pour le bouton d'impression dans Excel.

Télécharger le cahier d'exercices

Vous pouvez télécharger le modèle Excel gratuit ici et vous exercer par vous-même.

Code VBA pour créer un bouton d'impression.xlsm

5 exemples d'utilisation du code VBA pour le bouton d'impression dans Excel

Commençons par présenter notre jeu de données qui représente quelques du vendeur ventes dans différents Régions .

Utilisez le code VBA pour créer un bouton d'impression pour la boîte de dialogue d'impression dans Excel.

Tout d'abord, nous allons créer un Bouton d'impression et ensuite écrira des codes pour cela.

Des pas :

  • Cliquez sur comme suit : Développeur >> ; Insérer >> ; Boîte à boutons.

Peu après, vous recevrez un signe plus (+) dans votre curseur .

  • Traînée que curseur en fonction de vos souhaits taille du bouton et après un certain temps, un boîte de dialogue nommé Attribuer une macro s'ouvrira.

  • Donnez un nom et presse Nouveau .

A VBA apparaît.

  • Ensuite, tapez les codes suivants dans celui-ci-
 Sub DialogBox() Application.Dialogs(xlDialogPrint).Show End Sub 
  • Maintenant revenir en arrière à votre feuille .

Découpage du code

  • Ici, j'ai créé un Sous procédure, Boîte de dialogue .
  • Puis utilisé Dialogues (xlDialogPrint).Show pour ouvrir le Boîte de dialogue d'impression .

Le bouton est créé.

  • Cliquez à droite sur sur le bouton et sélectionnez Modifier le texte de la Menu contextuel pour modifier le nom du bouton.

  • Plus tard, juste type le site nom et cliquez sur votre souris partout à l'extérieur du bouton .

Ensuite, il suffit d'appuyer sur la touche Bouton .

Ensuite, vous obtiendrez le Boîte de dialogue d'impression Si tu veux, tu peux Imprimer maintenant.

Si vous n'avez pas de Imprimante en ce moment, vous pouvez Sauvez comme PDF . pour une utilisation ultérieure ou pour Imprimer plus tard.

  • Maintenant, appuyez sur OK .

  • En ce moment, donnez juste un nom et appuyez sur Sauvez .

Voici l'imprimé PDF .

Lire la suite : Comment ajuster les paramètres d'impression dans Excel (8 bonnes astuces)

2. utiliser le code VBA pour créer un bouton d'impression pour la feuille active.

Ici, nous utiliserons VBA à imprimer un Actif Feuille .

Des pas :

  • Suivez les première étape en deux temps de la première section pour créer le bouton et Affecter une macro .
  • Écrire un Nom de la macro et appuyez sur Nouveau .

Peu après, un VBA s'ouvrira.

  • Puis écrire les éléments suivants codes en elle.
 Sub ActiveSheet() ActiveSheet.PrintOut End Sub 
  • Plus tard, revenir en arrière au

Découpage du code

  • Ici, j'ai créé un Sous procédure, Feuille active .
  • Puis utilisé PrintOut à sélectionnez le site feuille active et imprimer il.
  • Maintenant, juste presse le site Bouton .

A boîte de dialogue nommé Enregistrer la sortie d'impression sous s'ouvrira.

  • Donnez un nom et appuyez sur Sauvez .

Vous obtiendrez alors l'imprimé PDF .

Vous pouvez facilement modifier le imprimante si vous en avez besoin.

  • Cliquez sur sur Fichier à côté de la Accueil

  • Sélectionnez ensuite Imprimer et l'option cliquez sur sur le liste déroulante pour sélectionner un Imprimante .

Lire la suite : Comment imprimer toutes les feuilles dans Excel (3 méthodes)

3. appliquer le code VBA pour créer un bouton d'impression pour les feuilles sélectionnées dans Excel

Si vous voulez Imprimer spécifique feuilles sélectionnées alors il est également possible d'utiliser VBA .

Des pas :

  • Suivez les première étape en deux temps de la première section pour créer le bouton et attribuer a macro .
  • Ensuite, écrivez un Nom de la macro et appuyez sur Nouveau .

Peu après, un VBA s'ouvrira.

  • Plus tard, type les éléments suivants codes en elle.
 Sub SelectedSheets() ActiveWindow.SelectedSheets.PrintOut End Sub 

Puis revenir en arrière à votre feuille .

Découpage du code

  • Ici, j'ai créé un Sous procédure, Feuilles sélectionnées .
  • Puis utilisé ActiveWindow à feuille de choix de la actif Excel fenêtre .
  • Ensuite, on a utilisé PrintOut pour imprimer multiple sélectionné feuilles .
  • Maintenant feuilles sélectionnées et appuyez sur la touche Bouton d'impression . j'ai sélectionné deux feuilles.

  • Donnez un nom pour le PDF et appuyez sur Sauvez .

Le site PDF Le fichier n'a pas wo pages pour le deux feuilles .

Lire la suite : Comment imprimer des feuilles spécifiques en utilisant la macro VBA dans Excel (4 façons)

Lectures similaires :

  • Comment imprimer une feuille Excel au format A4 (4 façons)
  • Comment conserver l'en-tête dans Excel lors de l'impression (3 façons)
  • Excel VBA : Comment définir dynamiquement la zone d'impression (7 façons)
  • Comment imprimer une feuille Excel avec des lignes (3 façons simples)
  • Comment imprimer un graphique dans Excel (5 façons)

Embarquez Excel VBA pour créer un bouton d'impression pour une feuille spécifique avec une plage sélectionnée.

Ici, nous allons faire un Bouton d'impression à imprimer a gamme choisie d'un feuille spécifique .

Des pas :

  • Suivez les première étape en deux temps de la première section pour créer le bouton et assigner une macro.
  • Écrire un Nom de la macro et appuyez sur Nouveau .

Peu après, un VBA s'ouvrira.

  • Puis écrire les éléments suivants codes -
 Sub SpecificSheetnRange() With Sheets("SpecificSheet+Range") .PageSetup.PrintArea = "B2:D11" .PrintOut End With End Sub 
  • Plus tard, revenez à votre feuille.

Découpage du code

  • Ici, j'ai créé un Sous procédure, Gamme de feuilles spécifiques .
  • Puis utilisé Avec déclaration à sélectionnez a spécifique
  • Suivant, PrintArea = "B2:D11".PrintOut sera sélectionnez le site gamme de la feuille spécifique et va Imprimer il.
  • Maintenant, juste presse le site Bouton d'impression .

  • Définir un nom pour le PDF et appuyez sur Sauvez .

C'est le imprimé fiche spécifique.

Lire la suite : Excel VBA : définir la zone d'impression pour plusieurs plages (5 exemples)

Embarquez Excel VBA pour créer un bouton d'impression pour la feuille active avec la plage sélectionnée.

En outre, vous pouvez sélectionnez une gamme de la feuille active et peut faire un Bouton d'impression à imprimer en utilisant VBA .

Des pas :

  • Suivez les première étape en deux temps de la première section pour créer le bouton et attribuer un macro .
  • Plus tard, écrivez un Nom de la macro et appuyez sur Nouveau .

Peu après, un VBA s'ouvrira.

  • Dans le VBA fenêtre, écrire les éléments suivants codes -
 Sub ActiveSheetnRange() Range("B2:D11").PrintOut End Sub 
  • Puis revenir en arrière à votre feuille .

Découpage du code

  • Ici, j'ai créé un Sous procédure, Plage de feuilles actives .
  • Puis utilisé Range("B2:D11").PrintOut à sélectionnez a gamme et imprimer.
  • Appuyez sur le bouton Bouton d'impression .

  • Donnez un nom et appuyez sur Sauvez .

Ensuite, vous obtiendrez le gamme imprimée .

Lire la suite : Bouton Excel pour imprimer des feuilles spécifiques (avec des étapes faciles)

Conclusion

J'espère que les procédures décrites ci-dessus seront suffisamment bonnes pour utiliser du code VBA pour le bouton d'impression N'hésitez pas à poser vos questions dans la section des commentaires et à me faire part de vos réactions.

Hugh West est un formateur et analyste Excel très expérimenté avec plus de 10 ans d'expérience dans l'industrie. Il est titulaire d'un baccalauréat en comptabilité et finance et d'une maîtrise en administration des affaires. Hugh a une passion pour l'enseignement et a développé une approche pédagogique unique qui est facile à suivre et à comprendre. Sa connaissance approfondie d'Excel a aidé des milliers d'étudiants et de professionnels du monde entier à améliorer leurs compétences et à exceller dans leur carrière. Grâce à son blog, Hugh partage ses connaissances avec le monde, offrant des tutoriels Excel gratuits et une formation en ligne pour aider les particuliers et les entreprises à atteindre leur plein potentiel.