Convert Multiple Excel Sheets to PDFs with VBA 📄

एक्सेल मल्टीपल शीट को व्यक्तिगत पीडीएफ फाइल में कन्वर्ट करें VBA का उपयोग करके - VBA CODE FOR MULTIPLE EXCEL SHEETS TO INDIVIDUAL PDF FILE #excel #exceltips #learning #vba



Sub SplitEachWorksheet()
Dim FPath As String
FPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False

For Each ws In ThisWorkbook.Sheets
ws.Copy
Application.ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=FPath & "\" & ws.Name & ".xlsx"
Application.ActiveWorkbook.Close False
Next

Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub