Przejdź do głównej zawartości

Jak przekonwertować 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?


Konwertuj wiele formatów xls na formaty xlsx za pomocą funkcji Zapisz jako jeden po drugim

Funkcja Zapisz jako w programie Excel może pomóc w konwersji formatu xls starego skoroszytu na nowy format xlsx jeden po drugim.

1. Otwórz skoroszyt, w którym chcesz przekonwertować jego format.

2. Kliknij filet > Zapisz jakoI Zapisz jako pojawi się okno dialogowe, określ folder, w którym ma zostać umieszczony nowy format pliku, a następnie kliknij Zapisz jako typ rozwijana lista do wyboru Skoroszyt programu Excelzobacz zrzut ekranu:

3. Następnie kliknij Zapisz przycisk, aby zamknąć okno dialogowe, a ten format Excela został przekonwertowany z xls do xlsx.

Tips: Z tym Zapisz jako funkcja, konwertujesz tylko jeden plik Excel naraz, jeśli masz setki plików Excela do konwersji, ta metoda nie jest dobrym wyborem.

Konwertuj wiele formatów xls na formaty xlsx jednocześnie za pomocą kodu VBA

Jeśli chcesz przekonwertować wiele plików xls na pliki xlsx naraz bez zapisywania jednego po drugim, tutaj opowiem o kodzie VBA dla Ciebie, 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 formatów xls na formaty xlsx jednocześnie

Sub ConvertToXlsx()
'Updateby Extendoffice
Dim strPath As String
Dim strFile As String
Dim xWbk As Workbook
Dim xSFD, xRFD As FileDialog
Dim xSPath As String
Dim xRPath As String
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.Title = "Please select the folder contains the xls files:"
.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 folder for outputting the new files:"
.InitialFileName = "C:\"
End With
If xRFD.Show <> -1 Then Exit Sub
xRPath = xRFD.SelectedItems.Item(1) & "\"
strPath = xSPath & "\"
strFile = Dir(strPath & "*.xls")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Do While strFile <> ""
If Right(strFile, 3) = "xls" Then
Set xWbk = Workbooks.Open(Filename:=strPath & strFile)
xWbk.SaveAs Filename:=xRPath & strFile & "x", _
FileFormat:=xlOpenXMLWorkbook
xWbk.Close SaveChanges:=False
End If
strFile = Dir
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. Następnie naciśnij F5 klucz do uruchomienia tego kodu, a zostanie wyświetlone okno, wybierz folder zawierający pliki xls, które chcesz przekonwertować, zobacz zrzut ekranu:

4. Następnie kliknij OK, wyskakuje kolejne okno, wybierz ścieżkę do folderu, w którym chcesz wyprowadzić nowe przekonwertowane pliki, 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 formatów xls na formaty xlsx jednocześnie dzięki zaawansowanej funkcji

Z tym Kutools dla programu Excel'S Formatuj konwerter narzędzie, możesz konwertować wiele formatów xls na formaty xlsx lub odwrotnie, może również pomóc w konwersji wielu skoroszytów do plików PDF jednocześnie.

Uwaga:Aby to zastosować Formatuj konwerter, po pierwsze, należy pobrać plik Kutools dla programu Excel, a następnie szybko i łatwo zastosuj tę funkcję.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Kliknij Kutools Plus > skoroszyt > Formatuj konwerterzobacz zrzut ekranu:

2. Pojawi się okienko z pytaniem przypominające, że musisz zamknąć skoroszyt, który chcesz przekonwertować. Zobacz zrzut ekranu:

3. Kliknij OK, a następnie w Konwerter formatu plików w oknie dialogowym określ następujące opcje:

  • Pod Konwertuj typ rozwijaną listę, wybierz Excel 97-2003 do Excel 2007 lub nowszy;
  • Następnie kliknij Dodaj przycisk, aby dodać pliki xls, które chcesz przekonwertować, możesz dodać skoroszyty z dysku komputera lub OneDrive według potrzeb;

4. Po wstawieniu plików xls 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:

Uwagi: W powyższym oknie dialogowym:
  • 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ę, po zakończeniu konwersji możesz przejść do określonego folderu, aby wyświetlić podgląd przekonwertowanego wyniku. Zobacz zrzuty ekranu:

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

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...

Opis


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!
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Please could you change the VBA code so that it looks in subfolders of the chosen folder.
Could it also output a log file to show everything its converted?
This comment was minimized by the moderator on the site
Thank You!
This comment was minimized by the moderator on the site
Thanks so much for the VBA CODE. Very Useful
This comment was minimized by the moderator on the site
Can you save a xls as a xlsx and maintain 1,048,576 rows and XFD Columns?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations