Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment utiliser le bouton de commande pour enregistrer la feuille de calcul active en tant que fichier PDF dans Excel?

Lorsque vous travaillez dans Microsoft Excel, vous pouvez rencontrer le problème de l'enregistrement de la feuille de calcul active en tant que fichier PDF. Dans cet article, vous pouvez apprendre à enregistrer une feuille de calcul active en tant que fichier PDF avec du code VBA via un bouton de commande. Et si vous souhaitez également enregistrer une plage ou chaque feuille de calcul dans le classeur actif en tant que fichier PDF individuel, cet article peut également vous aider.

Utilisez le bouton de commande pour enregistrer la feuille de calcul active en tant que fichier PDF avec le code VBA

Enregistrer une série de cellules sélectionnées au format PDF avec Kutools for Excel

Enregistrer chaque feuille de calcul en tant que fichier PDF individuel du classeur actif avec Kutools for Excel


Enregistrez facilement la sélection au format PDF dans Excel:

Cliquez Entreprise > Import / Export > Exporter la plage vers un fichier. le Kutools for Excel's Exporter la plage vers un fichier utilitaire vous permet d'exporter facilement la sélection au format PDF dans Excel. Voir ci-dessous capture d'écran:

Kutools for Excel comprend plus de 300 outils maniables Excel. Gratuit pour essayer sans limitation dans les jours 30. Télécharger l'essai gratuit maintenant

doc sélection en pdf


Utilisez le bouton de commande pour enregistrer la feuille de calcul active en tant que fichier PDF avec le code VBA


Vous pouvez exécuter le code VBA suivant pour enregistrer une feuille de calcul active en tant que fichier PDF en cliquant sur un bouton de commande. S'il vous plaît faire comme suit.

1. Tout d'abord, vous devez créer un dossier nommé PDF pour enregistrer votre nouveau fichier PDF converti. Ici, je crée ce dossier sur mon disque local (C :).

2. Veuillez insérer un bouton de commande en cliquant sur Développeur > insérer > Bouton de commande (contrôle ActiveX). Voir la capture d'écran:

2. Puis dessinez un bouton de commande dans la feuille de calcul dont vous avez besoin pour ajouter de nouvelles lignes, cliquez avec le bouton droit sur le bouton de commande et cliquez sur Propriétés dans le menu contextuel.

3. dans le Propriétés boîte de dialogue, entrez le texte affiché du bouton de commande dans le Légende boîte sous la Classés onglet, puis fermez la boîte de dialogue.

Vous pouvez voir le texte affiché du bouton de commande est modifié comme illustré ci-dessous.

4. Cliquez avec le bouton droit de la souris sur le bouton de commande, puis cliquez sur Voir le code dans le menu contextuel.

5. Dans l'ouverture Microsoft Visual Basic pour applications fenêtre, veuillez remplacer le code d'origine dans la fenêtre Code par le code VBA suivant.

Code VBA: Bouton de commande pour enregistrer une feuille de calcul active en PDF

Private Sub CommandButton1_Click()
    Application.ScreenUpdating = False
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
            Filename:="C:\PDF\Export.pdf", _
            OpenAfterPublish:=False
    Application.ScreenUpdating = True
End Sub

Note: Dans le code, CommandButton1 est le nom du bouton de commande que vous utiliserez pour enregistrer la feuille active en tant que fichier PDF. "C: \ PDF \ Export.pdf" est le chemin et le nom de votre fichier PDF.

6. appuie sur le autre + Q touches simultanément pour fermer le Microsoft Visual Basic pour applications fenêtre. Puis éteignez le Mode de conception sous le Développeur languette.

Maintenant, cliquez sur le bouton de commande, la feuille de calcul active sera enregistrée dans un fichier PDF nommé Export et situé à l'emplacement spécifié.


Enregistrer une série de cellules sélectionnées au format PDF avec Kutools for Excel

Si vous souhaitez simplement enregistrer une plage de cellules sélectionnées au format PDF, vous pouvez essayer Exporter la plage vers un fichier utilité de Kutools for Excel. S'il vous plaît faire comme suit.

1. Sélectionnez la plage que vous devez enregistrer en tant que fichier PDF, puis cliquez sur Entreprise > Import / Export > Exporter la plage vers un fichier. Voir la capture d'écran:

2. dans le Exporter la plage vers un fichier boîte de dialogue, vous devez:

2.1 Sélectionnez le PDF option dans la section Format de fichier;

2.2 Spécifiez un dossier pour enregistrer votre fichier PDF dans le Enregistrer la direction section;

2.3 Cliquez sur le OK .

2.4 Nommez votre fichier PDF dans la deuxième boîte de dialogue Exporter la plage dans un fichier, puis cliquez sur le OK bouton. Voir la capture d'écran:

Note: Vous pouvez vérifier le formatage Preserve, Conserver les hauteurs de ligne ainsi que Conserver les largeurs de colonnes dans la section Options du classeur selon vos besoins. Et vous pouvez ouvrir le fichier PDF exporté automatiquement en vérifiant la Ouvrez le fichier après l'exportation boîte.

Maintenant, la plage sélectionnée est enregistrée en tant que fichier PDF.

Pointe.Si vous voulez avoir un essai gratuit de cet utilitaire, allez à téléchargez le logiciel librement d'abord, puis allez appliquer l'opération selon les étapes ci-dessus.


Enregistrer chaque feuille de calcul en tant que fichier PDF individuel du classeur actif avec Kutools for Excel

Vous pouvez utiliser le Manuel de travail divisé utilité de Kutools for Excel pour enregistrer chaque feuille de calcul dans le classeur actif en tant que fichier PDF individuel facilement.

Kutools for Excel : avec plus de 300 compléments Excel pratiques, gratuit pour essayer sans limitation dans 60 jours.

1. Dans le classeur, vous devez enregistrer chaque feuille de calcul en tant que fichier PDF individuel, puis cliquez sur Entreprise > Classeur > Manuel de travail divisé. Voir la capture d'écran:

2. dans le Manuel de travail divisé boîte de dialogue, vous pouvez voir toutes les feuilles de calcul sont répertoriés à l'intérieur, s'il vous plaît sélectionnez PDF (* .pdf) Option de Enregistrer en tant que type de liste déroulante, puis cliquez sur Divisé bouton. Et dans le popping Parcourir pour le dossier boîte de dialogue, spécifiez un dossier dans lequel vous souhaitez enregistrer les fichiers PDF, puis cliquez sur le OK bouton. Voir la capture d'écran:

Ensuite, toutes les feuilles de calcul dans le classeur actif sont enregistrées en tant que fichier PDF individuel immédiatement.

Pointe.Si vous voulez avoir un essai gratuit de cet utilitaire, allez à téléchargez le logiciel librement d'abord, puis allez appliquer l'opération selon les étapes ci-dessus.


Démo: Enregistrer la sélection ou chaque feuille de calcul au format PDF avec Kutools for Excel

Kutools for Excel comprend plus de 300 outils maniables Excel. Gratuit pour essayer sans limitation dans les jours 60. Téléchargez l'essai gratuit maintenant!


Articles connexes:



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Nzee · 4 months ago
    IT SHOWS Run-Time error '1004'
    • To post as a guest, your comment is unpublished.
      crystal · 3 months ago
      Hi Nzee,
      I need to know your Excel version. Thank you for your comment.
  • To post as a guest, your comment is unpublished.
    Randy · 8 months ago
    I can convert my files to PDF now with a command button, but can I also get that same function to allow a different name to each file; based on an existed number structure?
  • To post as a guest, your comment is unpublished.
    Jo Colenso · 1 years ago
    I have a similar request I want the file to be named the same as a particular cell in the tab , IE: G19 ( This is the invoice number and I want the file to save as PDF with that name) ? . I have managed to get the export.pdf working but this isn't going to work on multiple saves.Any thoughts thanks
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Good Day,
      The following VBA code can help you solve the problem. Please select cell G19 in the popping up Kutoos for Excel dialog box after running the code. Thank you for your comment.

      Private Sub CommandButton1_Click()
      Dim xRg As Range
      Dim xName As String
      On Error Resume Next
      Application.ScreenUpdating = False
      Set xRg = Application.InputBox("Select the cell you will name the PDF with the cell value:", "Kutools for Excel", Selection.Address, , , , , 8)
      If xRg Is Nothing Then Exit Sub
      xName = xRg(1).Value
      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
      Filename:="C:\PDF\" & xName & ".pdf", _
      OpenAfterPublish:=False
      Application.ScreenUpdating = True
      End Sub
  • To post as a guest, your comment is unpublished.
    Ian · 2 years ago
    Hi,
    How would one allow the user to enter the file name as opposed to "Export.pdf"?
    Thanks,
    Ian
    • To post as a guest, your comment is unpublished.
      Mayur · 1 years ago
      Sub SaveAsPDF()
      Application.Screen Updating = False
      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
      Filename:=Application.InputBox("Enter File Name")

      strExcelPath = "H:\My Documents"

      Application.ScreenUpdating = True
      End Sub