כיצד לפצל גיליונות אקסל לקובצי PDF בודדים

כשאתה עובד עם קובץ אקסל, אתה יכול לשמור קובץ אקסל כקובץ PDF עם זאת, זה כדי לשמור קובץ Excel אחד ב-PDF. כאשר אתה צריך להמיר כרטיסיות רבות של Excel לקובצי PDF בודדים, בצע את השלבים הבאים:

שלב 1: לחיצה על קיצור הדרך ' Alt + F11 ' כדי לפתוח את חלון Microsoft Visual Basic for Applications;

לחלופין, אנא לחץ על ' מפתח 'הכרטיסייה מהסרט ולחץ על' ויז'ואל בייסיק 'כדי לפתוח את החלון.



שלב 2: בחלון החדש, לחץ על ' לְהַכנִיס ' הכרטיסייה מהסרט ולחץ על ' מודול ';

שלב 3: העתק והדבק את הקודים הבאים בחלון המודול;

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: לחץ על ' הפעל את סאב כפתור ' (או הקש על מקש F5) כדי להפעיל את הקודים;

שלב 5: בחר את נתיב הקובץ שהם עומדים להישמר;

שלב 6: כל גליונות העבודה יישמרו כקבצי PDF בודדים בתיקייה.