Jak przewinąć określony arkusz lub wszystkie arkusze do góry w programie Excel?
W tym artykule pokażemy metodę przewijania określonego arkusza lub wszystkich arkuszy do górnego wiersza skoroszytu w programie Excel.
Przewiń określony arkusz lub wszystkie arkusze do góry za pomocą kodu VBA
Przewiń określony arkusz lub wszystkie arkusze do góry za pomocą kodu VBA
Aby przewinąć określony arkusz lub wszystkie arkusze do górnego wiersza w programie Excel, wykonaj następujące czynności.
1. W arkuszu, który musisz przewinąć do góry, naciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł. Następnie skopiuj i wklej kod VBA do okna Code.
Kod VBA: Przewiń określony arkusz do góry
Sub ScrollToTop()
ActiveWindow.ScrollRow = 1
End Sub
Aby przewinąć wszystkie arkusze do góry w bieżącym skoroszycie, zastosuj następujący kod VBA.
Kod VBA: Przewiń wszystkie arkusze do góry
Sub Select_A1_On_Activeworkbook()
Dim xSheet As Worksheet
For Each xSheet In ActiveWorkbook.Sheets
xSheet.Activate
ActiveSheet.Range("A1").Select
Next
ActiveWorkbook.Worksheets(1).Activate
End Sub
3. Po wpisaniu kodu VBA w oknie Kod należy nacisnąć F5 klucz do uruchomienia kodu.
Następnie aktywny arkusz roboczy lub wszystkie arkusze w bieżącym skoroszycie są natychmiast przewijane do góry.
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!