Jak zawsze wyświetlać wykres podczas przewijania w programie Excel?
Jeśli w arkuszu znajduje się wykres, podczas przewijania arkusza w dół, aby wyświetlić dane, wykresu nie można wyświetlić w tym samym czasie, co pokazano na poniższym zrzucie ekranu, co musi być nieprzyjemne. W tym artykule przedstawiam kod VBA, aby wykres był zawsze widoczny, nawet podczas przewijania arkusza w dół lub w górę.
![]() |
![]() |
![]() |
Zawsze miej na oku wykres
Aby zachować wykres w widoku podczas przewijania arkusza, możesz zastosować poniższy kod VBA, aby go rozwiązać.
1. Kliknij prawym przyciskiem myszy kartę arkusza, w której chcesz zachować widoczność wykresu, i kliknij Wyświetl kod tworzą menu kontekstowe. Zobacz zrzut ekranu:
2. W poppingu Microsoft Visual Basic for Applications okno, wklej poniższy kod do pustego skryptu.
VBA: trzymaj wykres zawsze w widoku
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice20161111
Dim CPos As Double
Application.ScreenUpdating = False
CPos = ActiveWindow.ScrollRow * ActiveCell.RowHeight
ActiveSheet.ChartObjects("Chart 2").Activate
ActiveSheet.Shapes("Chart 2").Top = CPos
ActiveWindow.Visible = False
Application.ScreenUpdating = True
End Sub
3. Zapisz i zamknij okno dialogowe, a po kliknięciu dowolnej komórki wykres będzie przesuwany w dół lub w górę.
Uwagi:
(1) W kodzie VBA Chart 2 to nazwa wykresu, którą chcesz zachować, możesz ją zmienić w razie potrzeby.
(2) Ten język VBA nie zawsze może wyświetlać grupę wykresów.
Najlepsze narzędzia biurowe
Kutools dla programu Excel rozwiązuje większość problemów i zwiększa produktywność o 80%
- Ponowne użycie: Szybko włóż złożone wzory, wykresy i wszystko, czego używałeś wcześniej; Szyfruj komórki z hasłem; Utwórz listę mailingową i wysyłaj e-maile ...
- Pasek Super Formula (łatwo edytować wiele wierszy tekstu i formuły); Układ do czytania (łatwe odczytywanie i edytowanie dużej liczby komórek); Wklej do filtrowanego zakresu...
- Scal komórki / wiersze / kolumny bez utraty danych; Podziel zawartość komórek; Połącz zduplikowane wiersze / kolumny... Zapobiegaj zduplikowanym komórkom; Porównaj zakresy...
- Wybierz Duplikat lub Unikalny Wydziwianie; Wybierz puste wiersze (wszystkie komórki są puste); Super Find i Fuzzy Find w wielu zeszytach ćwiczeń; Losowy wybór ...
- Dokładna kopia Wiele komórek bez zmiany odwołania do formuły; Automatyczne tworzenie odniesień do wielu arkuszy; Wstaw punktory, Pola wyboru i nie tylko ...
- Wyodrębnij tekst, Dodaj tekst, Usuń według pozycji, Usuń przestrzeń; Tworzenie i drukowanie podsumowań stronicowania; Konwertuj zawartość komórek i komentarze...
- Super filtr (zapisz i zastosuj schematy filtrów do innych arkuszy); Zaawansowane sortowanie według miesiąca / tygodnia / dnia, częstotliwości i innych; Specjalny filtr pogrubieniem, kursywą ...
- Połącz skoroszyty i arkusze robocze; Scal tabele na podstawie kluczowych kolumn; Podziel dane na wiele arkuszy; Konwersja wsadowa xls, xlsx i PDF...
- Ponad 300 zaawansowanych funkcji. Obsługuje Office / Excel 2007-2021 i 365. Obsługuje wszystkie języki. Łatwe wdrażanie w przedsiębiorstwie lub organizacji. Pełne funkcje 30-dniowa bezpłatna wersja próbna. 60-dniowa gwarancja zwrotu pieniędzy.

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!















