Comment convertir plusieurs classeurs ou feuilles de calcul en fichiers PDF à la fois dans Excel?
Parfois, vous devez convertir vos fichiers Excel en fichiers PDF, afin qu'ils ne puissent pas être modifiés par d'autres. Dans Excel, nous pouvons enregistrer un fichier Excel en tant que fichier PDF en utilisant la fonction Enregistrer sous. Mais comment convertir plusieurs classeurs en fichiers PDF en même temps dans Excel?
- Convertissez plusieurs classeurs en fichiers PDF avec la fonction Enregistrer sous un par un
- Convertissez plusieurs classeurs en fichiers PDF avec le code VBA à la fois
- Convertissez plusieurs classeurs en fichiers PDF avec une fonctionnalité puissante
- Convertir plusieurs feuilles de calcul d'un classeur en fichiers PDF séparés avec le code VBA
- Convertissez plusieurs feuilles de calcul d'un classeur en fichiers PDF séparés avec une fonctionnalité pratique
Convertissez plusieurs classeurs en fichiers PDF avec la fonction Enregistrer sous un par un
Normalement, la fonctionnalité Enregistrer sous dans Excel peut vous aider à enregistrer l'intégralité du classeur dans un fichier PDF, procédez comme suit:
1. Lancez votre classeur que vous souhaitez convertir au format PDF.
2Cliquez sur Déposez votre dernière attestation > Enregistrer souset dans le Enregistrer sous boîte de dialogue, veuillez spécifier un dossier pour enregistrer le nouveau fichier, puis sélectionnez PDF du Enregistrer en tant que type de liste déroulante, puis cliquez sur Options bouton, voir capture d'écran:
3. Puis, dans le sauté Options boîte de dialogue, cochez Cahier complet, voir capture d'écran:
4. Et puis cliquez OK > Épargnez, tout ce classeur a été enregistré au format de fichier PDF.
Convertissez plusieurs classeurs en fichiers PDF avec le code VBA à la fois
S'il y a des centaines de fichiers Excel à convertir, la méthode ci-dessus sera gênante, ici, je parlerai d'un code VBA pour convertir plusieurs classeurs en fichiers PDF à la fois, veuillez suivre les étapes suivantes:
1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2Cliquez sur insérer > Moduleet collez le code suivant dans le Module Fenêtre.
Code VBA: convertissez plusieurs classeurs en fichiers PDF à la fois
Sub ExcelSaveAsPDF()
'Updateby Extendoffice
Dim strPath As String
Dim xStrFile1, xStrFile2 As String
Dim xWbk As Workbook
Dim xSFD, xRFD As FileDialog
Dim xSPath As String
Dim xRPath, xWBName As String
Dim xBol As Boolean
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.Title = "Please select the folder contains the Excel files you want to convert:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Set xRFD = Application.FileDialog(msoFileDialogFolderPicker)
With xRFD
.Title = "Please select a destination folder to save the converted files:"
.InitialFileName = "C:\"
End With
If xRFD.Show <> -1 Then Exit Sub
xRPath = xRFD.SelectedItems.Item(1) & "\"
strPath = xSPath & "\"
xStrFile1 = Dir(strPath & "*.*")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Do While xStrFile1 <> ""
xBol = False
If Right(xStrFile1, 3) = "xls" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xls", "_pdf")
xBol = True
ElseIf Right(xStrFile1, 4) = "xlsx" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xlsx", "_pdf")
xBol = True
ElseIf Right(xStrFile1, 4) = "xlsm" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xlsm", "_pdf")
xBol = True
End If
If xBol Then
xWbk.ExportAsFixedFormat Type:=xlTypePDF, Filename:=xRPath & xbwname & ".pdf"
xWbk.Close SaveChanges:=False
End If
xStrFile1 = Dir
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. Puis appuyez F5 clé pour exécuter ce code, et une fenêtre s'affichera, veuillez sélectionner un dossier contenant les classeurs que vous souhaitez convertir, voir capture d'écran:
4. Puis clique OK, une autre fenêtre apparaît, veuillez sélectionner un chemin de dossier dans lequel vous souhaitez exporter les nouveaux fichiers PDF, voir capture d'écran:
5. Et puis, clique OK, après avoir terminé la conversion, vous pouvez accéder au dossier spécifié pour prévisualiser le résultat converti, voir les captures d'écran:
Convertissez plusieurs classeurs en fichiers PDF avec une fonctionnalité puissante
Si vous avez Kutools for Excel, Avec son Convertisseur de format utilitaire, vous pouvez convertir rapidement plusieurs classeurs en fichiers PDF à la fois.
Après l'installation de Kutools for Excel, veuillez faire comme ceci:
1Cliquez sur Kutools Plus > Classeur > Convertisseur de format, voir capture d'écran:
2. Et une boîte de dialogue apparaît pour vous rappeler que vous devez fermer les classeurs que vous souhaitez convertir.
3Cliquez sur OK, alors, dans le Convertisseur FileFormat boîte de dialogue, spécifiez les options suivantes:
- En vertu des Normes sur l’information et les communications, les organismes doivent rendre leurs sites et applications Web accessibles. Ils y parviennent en conformant leurs sites Web au niveau AA des Web Content Accessibility Guidelines (WCAG). Convertir le type liste déroulante, sélectionnez Classeur Excel au format PDF;
- Puis clique Ajouter bouton pour ajouter les fichiers Excel que vous souhaitez convertir, vous pouvez ajouter les classeurs à partir de votre disque d'ordinateur ou OneDrive selon vos besoins;
4. Après avoir inséré les classeurs que vous souhaitez convertir, toujours dans le Convertisseur de format de fichier boîte de dialogue, veuillez cliquer bouton pour choisir un chemin de dossier pour sortir les fichiers convertis, puis spécifiez certaines opérations dont vous avez besoin au bas de la boîte de dialogue, voir capture d'écran:
- Si les classeurs des sous-dossiers devaient également être convertis, veuillez vérifier le Inclure les sous-dossiers lors de l'ajout de dossiers case à cocher;
- Si vous souhaitez supprimer les fichiers d'origine après la conversion, veuillez vérifier le Supprimer les fichiers source après la conversion boîte;
- Si vous souhaitez conserver la date de modification des fichiers originaux, veuillez cocher la case Conserver la date de modification des fichiers originaux boîte;
- La structure des répertoires du fichier peut être conservée en vérifiant La structure des répertoires du fichier est conservée lors de la conversion boîte;
5. Puis clique OK pour commencer la conversion, lorsque tous les fichiers Excel spécifiés ont été convertis en fichiers PDF, vous pouvez aller dans le dossier spécifié pour prévisualiser le résultat converti, voir les captures d'écran:
Convertir plusieurs feuilles de calcul d'un classeur en fichiers PDF séparés avec le code VBA
Dans certains cas, vous souhaiterez peut-être convertir chaque feuille de calcul du classeur en fichiers PDF séparés.S'il y a beaucoup de feuilles dans votre classeur, le code VBA ci-dessous peut vous aider à enregistrer chaque feuille de calcul en tant que fichier PDF à la fois.
1. Ouvrez un classeur que vous souhaitez convertir, puis maintenez la touche ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2Cliquez sur insérer > Moduleet collez le code suivant dans le Module Fenêtre.
Code VBA: Convertissez plusieurs feuilles de calcul d'un classeur en fichiers PDF séparés
Sub SplitEachWorksheet()
'Updateby Extendoffice
Dim xSPath As String
Dim xSFD As FileDialog
Dim xWSs As Sheets
Dim xWb As Workbook
Dim xWbs As Workbooks
Dim xNWb As Workbook
Dim xInt, xI As Integer
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.title = "Please select a folder to save the converted files:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWb = Application.ActiveWorkbook
Set xWbs = Application.Workbooks
Set xWSs = xWb.Sheets
Set xNWb = xWbs.Add
xInt = xWSs.Count
For xI = 1 To xInt
On Error GoTo EBreak
Set xWs = xWSs.Item(xI)
If xWs.Visible Then
xWSs(xWs.Name).Copy
Application.ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=xSPath & "\" & xWs.Name & ".pdf"
Application.ActiveWorkbook.Close False
End If
EBreak:
Next
xWb.Activate
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. Puis appuyez F5 clé pour exécuter ce code, et une fenêtre apparaît, veuillez choisir un chemin de dossier pour localiser les fichiers PDF convertis, voir capture d'écran:
4. Puis clique OK bouton, toutes les feuilles de calcul du classeur actuel ont été converties en fichiers PDF séparément, voir capture d'écran:
Convertissez plusieurs feuilles de calcul d'un classeur en fichiers PDF séparés avec une fonctionnalité pratique
Kutools for Excel prend également en charge une fonctionnalité utile - Classeur fractionné, avec cette fonctionnalité, vous pouvez enregistrer plusieurs feuilles de calcul dans le classeur pour séparer le fichier Excel, le fichier Txt, le fichier CSV et le fichier PDF selon vos besoins.
Après l'installation de Kutools for Excel, veuillez faire comme ceci:
1. Ouvrez le classeur que vous souhaitez enregistrer chaque feuille en tant que fichier PDF, puis cliquez sur Kutool Plus > Classeur > Classeur fractionné, voir capture d'écran:
2. Dans le Classeur fractionné boîte de dialogue, cochez la feuille que vous souhaitez enregistrer, puis choisissez PDF (* .pdf) du Enregistrer en tant que type de liste déroulante, puis cliquez sur Diviser bouton, dans le Sélectionner le dossier fenêtre, spécifiez un dossier pour mettre les fichiers convertis, voir capture d'écran:
3. Et puis, toutes les feuilles de calcul sélectionnées dans le classeur actuel ont été enregistrées individuellement dans des fichiers PDF, voir capture d'écran:
Articles plus relatifs:
- Convertir plusieurs fichiers Xls en fichiers Xlsx dans Excel
- Pour convertir un ancien fichier Excel xls en un nouveau fichier xlsx, vous pouvez appliquer la fonctionnalité Enregistrer sous dans Excel, mais, s'il y a plusieurs fichiers xls à convertir, comment pourrait-il gérer cette tâche rapidement et facilement?
- Enregistrer toutes les feuilles de calcul en tant que valeurs uniquement
- Si vous avez un classeur qui contient plusieurs formules, vous devez maintenant distribuer ce fichier à d'autres utilisateurs, vous ne souhaitez pas afficher les formules mais seules les valeurs sont affichées. Normalement, nous pouvons enregistrer rapidement une feuille de calcul en tant que valeurs en copiant et en collant les données en tant que valeurs uniquement. Mais, comment pouvez-vous enregistrer toutes les feuilles de calcul en tant que valeurs uniquement sans les copier et les coller une par une?
- Bouton de commande pour enregistrer la feuille de calcul active en tant que fichier PDF
- Lorsque vous travaillez dans Microsoft Excel, vous pouvez être confronté au problème de l'enregistrement de la feuille de calcul active en tant que fichier PDF. Dans cet article, vous pouvez apprendre à enregistrer la feuille de calcul active en tant que fichier PDF avec le 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.
- Diviser une grande table en plusieurs petites tables
- Si vous avez une grande feuille de calcul qui contient plusieurs colonnes et des centaines ou des milliers de données de lignes, vous souhaitez maintenant diviser cette grande table en plusieurs petites tables en fonction de la valeur de la colonne ou du nombre de lignes pour obtenir les résultats suivants. Comment pourriez-vous gérer cette tâche dans Excel?
- Fractionner un classeur pour séparer les fichiers Excel
- Vous devrez peut-être diviser un grand classeur pour séparer les fichiers Excel en enregistrant chaque feuille de calcul du classeur en tant que fichier Excel individuel. Par exemple, vous pouvez diviser un classeur en plusieurs fichiers Excel individuels, puis remettre chaque fichier à une personne différente pour le gérer. Ce faisant, vous pouvez amener certaines personnes à traiter des données spécifiques et à protéger vos données. Cet article présente des moyens de fractionner un grand classeur pour séparer les fichiers Excel en fonction de chaque feuille de calcul.
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!