Jak wstawić numer strony do komórki / nagłówka / stopki w programie Excel?
Podczas drukowania pliku Excel może być konieczne wstawienie numerów stron na stronach, aby wydrukowany plik był schludny i czytelny. W tym artykule przedstawię kilka szybkich sztuczek, aby wstawić numery stron do komórki, nagłówka lub stopki.
Wstaw numer strony do nagłówka / stopki w jednym arkuszu
Wstaw numer strony do nagłówka / stopki w wielu arkuszach
Wstaw numer strony do komórki z kodem VBA
Usuń wszystkie numery stron jednocześnie w programie Excel
Wstaw numer strony do nagłówka / stopki w jednym arkuszu
Zwykle możemy szybko wstawić numery stron do nagłówka lub stopki, używając rozszerzenia Nagłówek stopka funkcji, wykonaj następujące czynności:
1. Przejdź do arkusza roboczego, w którym chcesz wstawić numery stron do nagłówka lub stopki.
2. Następnie kliknij wstawka > Nagłówek stopka, a twój arkusz będzie w formacie Układ strony zobacz, zobacz zrzut ekranu:
3. Kliknij nagłówek lub stopkę, w której chcesz wstawić numer strony, a następnie a Designu karta z Narzędzia nagłówków i stopek jest wyświetlany na Wstążce, a następnie kliknij Designu > Numer stronyzobacz zrzut ekranu:
4. Możesz zobaczyć symbol zastępczy &[Strona] pojawi się w wybranej sekcji, a następnie kliknij w dowolnym miejscu poza obszarem nagłówka lub stopki, aby wyświetlić numery stron. Zobacz zrzut ekranu:
5. Teraz możesz przywrócić normalny widok, klikając Zobacz i wysłuchaj > Normalna, a po wydrukowaniu tego arkusza zobaczysz numery stron, które zostały wstawione do wybranego nagłówka lub stopki.
Uwagi: Jeśli chcesz, aby numery stron były wyświetlane w formacie 1 z 15, 2 z 15, wystarczy wpisać to bezpośrednio & [Strona] z & [Strony] w polu nagłówka lub stopki, zobacz zrzut ekranu:
Wstaw numer strony do nagłówka / stopki w wielu arkuszach
Powyższa metoda może pomóc ci wstawić numery stron do jednego arkusza roboczego, jeśli chcesz wstawić numery stron do wszystkich arkuszy roboczych skoroszytu, aby wszystkie strony były numerowane w kolejności sekwencyjnej, wykonaj następujące czynności:
1. Wybierz wszystkie karty arkuszy, a następnie przejdź do Układ strony kartę i kliknij Przycisk uruchamiania okna dialogowego ikona w Ustawienia strony grupa, patrz zrzut ekranu:
2, w Ustawienia strony kliknij Nagłówek stopka kartę, a następnie kliknij Nagłówek niestandardowy or Stopka niestandardowa aby przejść do ustawienia żądanego nagłówka lub stopki, zobacz zrzut ekranu:
3. I w Nagłówek or Footer W oknie dialogowym określ lokalizację, w której zostaną wstawione numery stron, klikając wewnątrz Lewa sekcja:, Sekcja środkowa:lub Prawa sekcja: w razie potrzeby, a następnie kliknij Wstaw numer strony ikona i symbol zastępczy &[Strona] pojawia się. Zobacz zrzut ekranu:
Uwaga: Wprowadź to & [Strona] z & [Strony] w polu nagłówka lub stopki, jeśli chcesz, aby numery stron wyświetlane jako 1 z 45, 2 z 45…
4. Następnie kliknij OK > OK aby zamknąć okna dialogowe, podczas drukowania tego skoroszytu w podglądzie wydruku można zobaczyć, że wszystkie numery stron są wstawiane do nagłówka lub stopki w kolejności sekwencyjnej.
Wstaw numer strony do komórki z kodem VBA
Wstawienie numerów stron do nagłówka lub stopki jest łatwe, ale jeśli chcesz wstawić numery stron do komórki arkusza, nie ma bezpośredniego sposobu, aby to zrobić. Poniższy kod VBA może pomóc w rozwiązaniu tego problemu.
1. Kliknij komórkę, w której chcesz wyświetlić numer strony tej komórki.
2. Przytrzymaj ALT + F11 klucze i otwiera plik Microsoft Visual Basic for Applications okno.
3, Kliknij wstawka > Modułi wklej następujący kod w Moduł Okno.
Kod VBA: wstaw bieżący numer strony do komórki:
Sub pagenumber()
'updateby Extendoffice 20160506
Dim xVPC As Integer
Dim xHPC As Integer
Dim xVPB As VPageBreak
Dim xHPB As HPageBreak
Dim xNumPage As Integer
xHPC = 1
xVPC = 1
If ActiveSheet.PageSetup.Order = xlDownThenOver Then
xHPC = ActiveSheet.HPageBreaks.Count + 1
Else
xVPC = ActiveSheet.VPageBreaks.Count + 1
End If
xNumPage = 1
For Each xVPB In ActiveSheet.VPageBreaks
If xVPB.Location.Column > ActiveCell.Column Then Exit For
xNumPage = xNumPage + xHPC
Next
For Each xHPB In ActiveSheet.HPageBreaks
If xHPB.Location.Row > ActiveCell.Row Then Exit For
xNumPage = xNumPage + xVPC
Next
ActiveCell = "Page " & xNumPage & " of " & Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
End Sub
4. Następnie naciśnij F5 klucz do uruchomienia tego kodu, a numer strony tej komórki jest wyświetlany w wybranej komórce, patrz zrzut ekranu:
Usuń wszystkie numery stron jednocześnie w programie Excel
Aby usunąć wszystkie numery stron, możesz wykonać następujące czynności:
1. Wybierz wszystkie karty arkuszy i przejdź do Układ strony na wstążce, a następnie kliknij Przycisk uruchamiania okna dialogowego ikona w Ustawienia strony grupa, patrz zrzut ekranu:
2, w Ustawienia strony okno dialogowe, kliknij Nagłówek stopka kartę, a następnie wybierz (None) z Nagłówek or Footer rozwijana lista, zobacz zrzut ekranu:
3. Następnie kliknij OK przycisk, wszystkie numery stron są usuwane ze skoroszytu jednocześnie.
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!
