Jak przekonwertować wiele skoroszytów lub arkuszy na pliki PDF jednocześnie w programie Excel?
Czasami musisz przekonwertować pliki Excela na pliki PDF, aby inni nie mogli ich modyfikować. W Excelu możemy zapisać plik Excela jako plik PDF za pomocą funkcji Zapisz jako. Ale jak przekonwertować wiele skoroszytów na pliki PDF w tym samym czasie w programie Excel?
- Konwertuj wiele skoroszytów do plików PDF za pomocą funkcji Zapisz jako jeden po drugim
- Konwertuj wiele skoroszytów na pliki PDF z kodem VBA jednocześnie
- Konwertuj wiele skoroszytów na pliki PDF dzięki zaawansowanej funkcji
- Konwertuj wiele arkuszy ze skoroszytu, aby oddzielić pliki PDF z kodem VBA
- Konwertuj wiele arkuszy ze skoroszytu na oddzielne pliki PDF za pomocą przydatnej funkcji
Konwertuj wiele skoroszytów do plików PDF za pomocą funkcji Zapisz jako jeden po drugim
Zwykle funkcja Zapisz jako w programie Excel może pomóc w zapisaniu całego skoroszytu do pliku PDF, wykonaj następujące czynności:
1. Uruchom skoroszyt, który chcesz przekonwertować do formatu PDF.
2. Kliknij filet > Zapisz jako, oraz w Zapisz jako W oknie dialogowym określ folder do zapisania nowego pliku, a następnie wybierz PDF z Zapisz jako typ rozwijaną listę, a następnie kliknij Opcje przycisk, zobacz zrzut ekranu:
3. Następnie wyskoczył Opcje okno dialogowe, zaznacz Cały zeszyt ćwiczeńzobacz zrzut ekranu:
4. A następnie kliknij OK > Zapisz, cały ten skoroszyt został zapisany w formacie PDF.
Konwertuj wiele skoroszytów na pliki PDF z kodem VBA jednocześnie
Jeśli trzeba przekonwertować setki plików Excela, powyższa metoda będzie kłopotliwa, tutaj opowiem o kodzie VBA do konwersji wielu skoroszytów do plików PDF jednocześnie, wykonaj następujące czynności:
1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. Kliknij wstawka > Modułi wklej następujący kod w Moduł Okno.
Kod VBA: konwertuj wiele skoroszytów na pliki PDF jednocześnie
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. Następnie naciśnij F5 klucz do uruchomienia tego kodu i zostanie wyświetlone okno, wybierz folder zawierający skoroszyty, które chcesz przekonwertować, zobacz zrzut ekranu:
4. Następnie kliknij OK, pojawia się kolejne okno, wybierz ścieżkę do folderu, w którym chcesz wyprowadzić nowe pliki PDF, zobacz zrzut ekranu:
5. A potem kliknij OKpo zakończeniu konwersji możesz przejść do wskazanego folderu, aby podejrzeć przekonwertowany wynik, zobacz zrzuty ekranu:
Konwertuj wiele skoroszytów na pliki PDF dzięki zaawansowanej funkcji
Jeśli Kutools dla programu Excel, Z siedzibą w Formatuj konwerter narzędzie, możesz szybko konwertować wiele skoroszytów do plików PDF jednocześnie.
Po zainstalowaniu Kutools dla programu Excel, zrób tak:
1. Kliknij Kutools Plus > skoroszyt > Formatuj konwerterzobacz zrzut ekranu:
2. Pojawi się okno zachęty przypominające o konieczności zamknięcia skoroszytów, które chcesz przekonwertować.
3. Kliknij OK, a następnie w Konwerter formatów plików w oknie dialogowym określ następujące opcje:
- Pod Konwertuj typ rozwijaną listę, wybierz Skoroszyt programu Excel do formatu PDF;
- Następnie kliknij Dodaj przycisk, aby dodać pliki Excela, które chcesz przekonwertować, możesz dodać skoroszyty z dysku komputera lub OneDrive według potrzeb;
4. Po wstawieniu skoroszytów, które chcesz przekonwertować, nadal w formacie Konwerter formatu plików kliknij przycisk, aby wybrać jedną ścieżkę folderu, aby wyprowadzić przekonwertowane pliki, a następnie określić niektóre potrzebne operacje u dołu okna dialogowego, patrz zrzut ekranu:
- Jeśli skoroszyty w podfolderach również wymagały konwersji, sprawdź plik Uwzględnij podfoldery podczas dodawania folderów pole wyboru;
- Jeśli chcesz usunąć oryginalne pliki po konwersji, sprawdź Usuń pliki źródłowe po konwersji pudełko;
- Jeśli chcesz zachować datę modyfikacji oryginalnych plików, sprawdź Zachowaj datę modyfikacji oryginalnych plików pudełko;
- Strukturę katalogów pliku można zachować, sprawdzając rozszerzenie Struktura katalogów pliku jest zachowywana podczas konwersji pudełko;
5. Następnie kliknij OK aby rozpocząć konwersję, gdy wszystkie określone pliki Excel zostaną przekonwertowane na pliki PDF, możesz przejść do określonego folderu, aby wyświetlić podgląd przekonwertowanego wyniku, zobacz zrzuty ekranu:
Konwertuj wiele arkuszy ze skoroszytu, aby oddzielić pliki PDF z kodem VBA
W niektórych przypadkach możesz chcieć przekonwertować każdy arkusz w skoroszycie na oddzielne pliki PDF, jeśli w skoroszycie jest dużo arkuszy, poniższy kod VBA może pomóc w zapisaniu każdego arkusza roboczego jako pliku PDF jednocześnie.
1. Otwórz skoroszyt, który chcesz przekonwertować, a następnie przytrzymaj klawisz ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. Kliknij wstawka > Modułi wklej następujący kod w Moduł Okno.
Kod VBA: konwertuj wiele arkuszy roboczych ze skoroszytu na oddzielne pliki PDF
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. Następnie wciśnij F5 klucz do uruchomienia tego kodu i wyskakuje okno, wybierz ścieżkę folderu do zlokalizowania przekonwertowanych plików PDF, zobacz zrzut ekranu:
4. Następnie kliknij OK przycisk, wszystkie arkusze robocze w bieżącym skoroszycie zostały przekonwertowane osobno pliki PDF, patrz zrzut ekranu:
Konwertuj wiele arkuszy ze skoroszytu na oddzielne pliki PDF za pomocą przydatnej funkcji
Kutools dla programu Excel obsługuje również przydatną funkcję - Podziel skoroszytDzięki tej funkcji możesz zapisać wiele arkuszy roboczych w skoroszycie, aby oddzielić plik Excel, plik Txt, plik CSV i plik PDF według potrzeb.
Po zainstalowaniu Kutools dla programu Excel, zrób tak:
1. Otwórz skoroszyt, w którym chcesz zapisać każdy arkusz jako plik PDF, a następnie kliknij Kutool Plus > skoroszyt > Podziel skoroszytzobacz zrzut ekranu:
2, w Podziel skoroszyt w oknie dialogowym zaznacz arkusz, który chcesz zapisać, a następnie wybierz PDF (* .pdf) z Zapisz jako typ listę rozwijaną, a następnie kliknij Split przycisk w Wybierz folder okno, określ folder do umieszczenia przekonwertowanych plików, zobacz zrzut ekranu:
3. A następnie wszystkie wybrane arkusze robocze w bieżącym skoroszycie zostały zapisane w plikach PDF indywidualnie, patrz zrzut ekranu:
Więcej artykułów względnych:
- Konwertuj wiele plików Xls na pliki Xlsx w programie Excel
- Aby przekonwertować stary plik xls Excel na nowy plik xlsx, możesz zastosować funkcję Zapisz jako w programie Excel, ale jeśli trzeba przekonwertować wiele plików xls, jak szybko i łatwo poradzić sobie z tym zadaniem?
- Zapisz wszystkie arkusze tylko jako wartości
- Jeśli masz skoroszyt, który zawiera wiele formuł, teraz musisz rozesłać ten plik do innych użytkowników, nie chcesz wyświetlać formuł, ale tylko wartości. Zwykle możemy szybko zapisać arkusz jako wartości, kopiując i wklejając dane tylko jako wartości. Ale jak można zapisać wszystkie arkusze tylko jako wartości bez kopiowania i wklejania jeden po drugim?
- Przycisk polecenia, aby zapisać aktywny arkusz roboczy jako plik PDF
- Pracując w programie Microsoft Excel możesz napotkać problem z zapisaniem aktywnego arkusza do pliku PDF. W tym artykule możesz dowiedzieć się, jak zapisać aktywny arkusz roboczy jako plik PDF z kodem VBA za pomocą przycisku polecenia. A jeśli chcesz również zapisać zakres lub każdy arkusz w aktywnym skoroszycie jako osobny plik PDF, ten artykuł również może Ci pomóc.
- Podziel duży stół na wiele małych stolików
- Jeśli masz duży arkusz roboczy zawierający wiele kolumn i setki lub tysiące wierszy danych, teraz chcesz podzielić tę dużą tabelę na wiele małych tabel na podstawie wartości kolumny lub liczby wierszy, aby uzyskać następujące wyniki. Jak poradzisz sobie z tym zadaniem w programie Excel?
- Podziel skoroszyt, aby oddzielić pliki Excela
- Może być konieczne podzielenie dużego skoroszytu, aby oddzielić pliki programu Excel, zapisując każdy arkusz skoroszytu jako oddzielny plik programu Excel. Na przykład możesz podzielić skoroszyt na wiele oddzielnych plików programu Excel, a następnie dostarczyć każdy plik innej osobie, która go obsłuży. W ten sposób możesz skłonić określone osoby do obsługi określonych danych i zapewnić bezpieczeństwo danych. W tym artykule przedstawimy sposoby dzielenia dużego skoroszytu w celu oddzielenia plików programu Excel na podstawie każdego arkusza.
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!