Kā sadalīt Excel lapas atsevišķos PDF failos

Strādājot ar Excel failu, varat saglabājiet Excel failu kā PDF failu Tomēr tas ir paredzēts, lai saglabātu vienu Excel failu PDF formātā. Ja jums ir jāpārvērš daudzas Excel cilnes atsevišķos PDF failos, lūdzu, veiciet tālāk norādītās darbības.

1. darbība: nospiediet īsinājumtaustiņu ' Alt + F11 ', lai atvērtu Microsoft Visual Basic for Applications logu;

Alternatīvi, lūdzu, noklikšķiniet uz ' Izstrādātājs ' cilni no lentes un noklikšķiniet uz ' Visual Basic ', lai atvērtu logu.



2. darbība. Jaunajā logā noklikšķiniet uz ' Ievietot ' cilni no lentes un noklikšķiniet uz ' Modulis ';

3. darbība: nokopējiet un ielīmējiet šādus kodus Moduļa logā;

Sub ExportAsPDF()
Dim Folder_Path As String
With Application.FileDialog(msoFileDialogFolderPicker)
.Title = "Select Folder path"
If .Show = -1 Then Folder_Path = .SelectedItems(1)
End With
If Folder_Path = "" Then Exit Sub
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Worksheets
sh.ExportAsFixedFormat xlTypePDF, Folder_Path & Application.PathSeparator & sh.Name & ".pdf"
Next
MsgBox "Congratulations!"
End Sub

4. darbība: noklikšķiniet uz ' Palaist Sub ' pogu (vai nospiediet taustiņu F5), lai palaistu kodus;

5. darbība: atlasiet faila ceļu, pa kuru tie tiks saglabāti;

6. darbība. Visas darblapas mapē tiks saglabātas kā atsevišķi PDF faili.

Microsoft Excel