Jak sortować dane w wielu arkuszach jednocześnie?
W programie Excel możemy szybko i łatwo sortować dane w arkuszu na podstawie określonej kolumny, ale czy kiedykolwiek próbowałeś posortować dane w wielu arkuszach? Sortowanie ich jeden po drugim będzie czasochłonne, w tym artykule przedstawię łatwy sposób rozwiązania tego problemu.
Sortuj dane w wielu arkuszach jednocześnie za pomocą kodu VBA
Sortuj dane w wielu arkuszach jednocześnie za pomocą kodu VBA
Aby posortować dane na podstawie jednej kolumny we wszystkich arkuszach skoroszytu, może Ci pomóc poniższy kod VBA.
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: Sortuj dane w wielu arkuszach jednocześnie:
Sub SortAllSheets()
'Updateby Extendoffice
Dim WS As Worksheet
ActiveSheet.Range("a1:f1").Select
Selection.Copy
On Error Resume Next
Application.ScreenUpdating = False
For Each WS In Worksheets
WS.Columns("A:F").Sort Key1:=WS.Columns("E"), Order1:=xlDescending
Next WS
ActiveSheet.Range("A1").PasteSpecial Paste:=xlPasteAll
Application.ScreenUpdating = True
End Sub
3. Następnie naciśnij F5 Aby uruchomić ten kod, wszystkie arkusze, które mają to samo formatowanie, zostały posortowane naraz na podstawie kolumny E każdego arkusza w porządku malejącym.
Note: W powyższym kodzie, Odp .: F to zakres danych, który chcesz posortować, E to litera kolumny, według której chcesz sortować.
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!