Cum se convertesc mai multe cărți de lucru sau foi de lucru în fișiere PDF simultan în Excel?
Uneori, trebuie să vă convertiți fișierele Excel în fișiere PDF, astfel încât să nu poată fi modificate de alții. În Excel, putem salva un fișier Excel ca fișier PDF utilizând funcția Salvare ca. Dar cum convertiți mai multe cărți de lucru în fișiere PDF în același timp în Excel?
- Convertiți mai multe cărți de lucru în fișiere PDF cu funcția Salvați ca unul câte unul
- Convertiți mai multe cărți de lucru în fișiere PDF cu cod VBA simultan
- Convertiți mai multe cărți de lucru în fișiere PDF cu o funcție puternică
- Convertiți mai multe foi de lucru dintr-un registru de lucru pentru a separa fișiere PDF cu cod VBA
- Convertiți mai multe foi de lucru dintr-un registru de lucru pentru a separa fișiere PDF cu o caracteristică utilă
Convertiți mai multe cărți de lucru în fișiere PDF cu funcția Salvați ca unul câte unul
În mod normal, funcția Salvare ca în Excel vă poate ajuta să salvați întregul registru de lucru într-un fișier PDF, vă rugăm să faceți acest lucru:
1. Lansați-vă registrul de lucru pe care doriți să îl convertiți în format PDF.
2. Clic Fișier > Salvare ca, și în Salvare ca caseta de dialog, vă rugăm să specificați un folder pentru salvarea noului fișier, apoi selectați PDF de la Salvați ca tip lista derulantă, apoi faceți clic pe Opţiuni buton, vezi captura de ecran:
3. Apoi, în pop-out Opţiuni casetă de dialog, bifați Întreg caietul, vezi captura de ecran:
4. Apoi faceți clic pe OK > Economisiți, întregul registru de lucru a fost salvat ca format de fișier PDF.
Convertiți mai multe cărți de lucru în fișiere PDF cu cod VBA simultan
Dacă există sute de fișiere Excel care trebuie convertite, metoda de mai sus va fi supărătoare, aici, voi vorbi despre un cod VBA pentru convertirea mai multor cărți de lucru în fișiere PDF simultan, vă rugăm să parcurgeți pașii următori:
1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. Clic Insera > Moduleși lipiți următorul cod în Module Fereastră.
Cod VBA: convertiți mai multe cărți de lucru în fișiere PDF simultan
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. Apoi, apăsați F5 tasta pentru a rula acest cod și se va afișa o fereastră, selectați un folder care conține registrele de lucru pe care doriți să le convertiți, vedeți captura de ecran:
4. Apoi apasa OK, se deschide o altă fereastră, selectați o cale a folderului în care doriți să scoateți noile fișiere PDF, vedeți captura de ecran:
5. Și apoi, clik OK, după terminarea conversiei, puteți merge la folderul specificat pentru a previzualiza rezultatul convertit, vedeți capturi de ecran:
Convertiți mai multe cărți de lucru în fișiere PDF cu o funcție puternică
Dacă aveţi Kutools pentru Excel, Cu său Convertor de format utilitar, puteți converti rapid mai multe cărți de lucru în fișiere PDF simultan.
După instalare Kutools pentru Excel, vă rugăm să faceți acest lucru:
1. Clic Kutools Plus > Workbook > Convertor de format, vezi captura de ecran:
2. Și se afișează o casetă de prompt pentru a vă reaminti că trebuie să închideți registrele de lucru pe care doriți să le convertiți.
3. Clic OK, apoi, în Convertor FileFormat , specificați următoarele opțiuni:
- Sub Conversia tipului lista derulantă, selectați Caiet de lucru Excel în PDF;
- Apoi faceți clic pe Adăuga butonul pentru a adăuga fișierele Excel pe care doriți să le convertiți, puteți adăuga registrele de lucru de pe discul computer sau OneDrive după cum aveți nevoie;
4. După inserarea registrelor de lucru pe care doriți să le convertiți, încă în Convertor format de fișiere casetă de dialog, faceți clic pe butonul pentru a alege o cale de folder pentru a afișa fișierele convertite și apoi specificați câteva operații de care aveți nevoie în partea de jos a casetei de dialog, consultați captura de ecran:
- Dacă și registrele de lucru din subfoldere trebuiau convertite, verificați Includeți subfoldere atunci când adăugați dosare Caseta de bifat;
- Dacă doriți să eliminați fișierele originale după conversie, vă rugăm să verificați Ștergeți fișierele sursă după conversie cutie;
- Dacă doriți să păstrați data modificată a fișierelor originale, vă rugăm să verificați Păstrați data modificată a fișierelor originale cutie;
- Structura directorului fișierului poate fi păstrată prin verificarea fișierului Structura directorului fișierului este păstrată când este convertită cutie;
5. Apoi apasa OK pentru a începe conversia, când toate fișierele Excel specificate au fost convertite în fișiere PDF, puteți merge la folderul specificat pentru a previzualiza rezultatul convertit, consultați capturi de ecran:
Convertiți mai multe foi de lucru dintr-un registru de lucru pentru a separa fișiere PDF cu cod VBA
În unele cazuri, poate doriți să convertiți fiecare foaie de lucru din registrul de lucru în fișiere PDF separate, dacă există o mulțime de foi în registrul de lucru, codul VBA de mai jos vă poate ajuta să salvați fiecare foaie de lucru ca fișier PDF simultan.
1. Deschideți un registru de lucru pe care doriți să îl convertiți, apoi țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. Clic Insera > Moduleși lipiți următorul cod în Module Fereastră.
Cod VBA: convertiți mai multe foi de lucru dintr-un registru de lucru în fișiere PDF separate
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. Apoi, apăsați F5 pentru a rula acest cod și apare o fereastră, vă rugăm să alegeți o cale a folderului pentru localizarea fișierelor PDF convertite, a se vedea captura de ecran:
4. Apoi apasa OK buton, toate foile de lucru din registrul de lucru curent au fost convertite separat fișiere PDF, consultați captura de ecran:
Convertiți mai multe foi de lucru dintr-un registru de lucru pentru a separa fișiere PDF cu o caracteristică utilă
Kutools pentru Excel acceptă, de asemenea, o caracteristică utilă - Carnet de lucru divizat, cu această caracteristică, puteți salva mai multe foi de lucru în registrul de lucru pentru a separa fișierul Excel, fișierul Txt, fișierul CSV și fișierul PDF, după cum aveți nevoie.
După instalare Kutools pentru Excel, vă rugăm să faceți acest lucru:
1. Deschideți registrul de lucru pe care doriți să salvați fiecare foaie ca fișier PDF, apoi faceți clic pe Kutool Plus > Workbook > Carnet de lucru divizat, vezi captura de ecran:
2. În Carnet de lucru divizat caseta de dialog, verificați foaia pe care doriți să o salvați, apoi alegeți PDF (* .pdf) de la Salvați ca tip lista derulantă, apoi faceți clic pe Despică , în butonul Selectați Dosar fereastră, specificați un folder pentru plasarea fișierelor convertite, consultați captura de ecran:
3. Și apoi, toate foile de lucru selectate din registrul de lucru curent au fost salvate în fișiere PDF individual, a se vedea captura de ecran:
Mai multe articole relative:
- Convertiți mai multe fișiere Xls în fișiere Xlsx în Excel
- Pentru a converti un fișier xls Excel vechi într-un fișier xlsx nou, puteți aplica caracteristica Salvare ca în Excel, dar, dacă sunt necesare mai multe fișiere xls pentru a fi convertite, cum ar putea face față acestei sarcini rapid și ușor?
- Salvați toate foile de lucru numai ca valori
- Dacă aveți un registru de lucru care conține mai multe formule, acum, trebuie să distribuiți acest fișier altor utilizatori, nu doriți să afișați formulele, ci numai valorile să fie afișate. În mod normal, putem salva rapid o foaie de lucru ca valori prin copierea și lipirea datelor numai ca valori. Dar, cum ați putea salva toate foile de lucru ca valori numai fără a copia și lipi una câte una?
- Buton de comandă pentru a salva foaia de lucru activă ca fișier PDF
- În timp ce lucrați în Microsoft Excel, vă puteți confrunta cu problema salvării foii de lucru active ca fișier PDF. În acest articol, puteți afla cum să salvați foaia de lucru activă ca fișier PDF cu cod VBA printr-un buton de comandă. Și dacă doriți, de asemenea, să salvați un interval sau fiecare foaie de lucru în registrul de lucru activ ca fișier PDF individual, acest articol vă poate ajuta, de asemenea.
- Împărțiți o masă mare în mai multe mese mici
- Dacă aveți o foaie de lucru mare care conține mai multe coloane și date de sute sau mii de rânduri, acum, doriți să împărțiți acest tabel mare în mai multe tabele mici pe baza valorii coloanei sau a numărului de rânduri pentru a obține următoarele rezultate. Cum ați putea face față acestei sarcini în Excel?
- Împărțiți un registru de lucru pentru a separa fișierele Excel
- Poate fi necesar să împărțiți un registru de lucru mare pentru a separa fișierele Excel salvând fiecare foaie de lucru a registrului de lucru ca fișier Excel individual. De exemplu, puteți împărți un registru de lucru în mai multe fișiere Excel individuale și apoi livrați fiecare fișier unei persoane diferite pentru a-l gestiona. Procedând astfel, puteți determina anumite persoane să gestioneze date specifice și să vă păstreze datele în siguranță. Acest articol va introduce modalități de a împărți un registru de lucru mare pentru a separa fișierele Excel pe baza fiecărei foi de lucru.
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!