Jak wielokrotnie drukować wiersze u dołu każdej drukowanej strony w programie Excel?
Domyślnie program Excel udostępnia użytkownikom funkcję wielokrotnego drukowania wierszy u góry. Ale w niektórych przypadkach możesz chcieć wielokrotnie drukować wiersze u dołu stron, z wyjątkiem u góry. Ten artykuł pokaże ci małe sztuczki.
Drukuj wiersze wielokrotnie na dole z kodem VBA
Drukuj wiersze wielokrotnie na dole z kodem VBA
Możesz uruchomić poniższy kod VBA, aby wstawić określony wiersz do stopki każdej strony. Następnie możesz wielokrotnie drukować ten wiersz u dołu każdej drukowanej strony w programie Excel.
1. naciśnij inny + F11 klawisze jednocześnie, aby otworzyć Microsoft Visual Basic dla aplikacji okno.
2. w Microsoft Visual Basic dla aplikacji okno dialogowe, kliknij wstawka > Moduł. Następnie skopiuj i wklej poniższy kod VBA do okna Module.
Kod VBA: wstaw określony wiersz do stopek każdej drukowanej strony
Sub MyFooter()
Dim xTxt As String
Dim xAddress As String
Dim xRg As Range
Dim xCell As Range
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select the row you will insert repeatedly at the bottom:", "Kutools for Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
For Each xCell In xRg
xTxt = xTxt & xCell.Value & " "
Next
ActiveSheet.PageSetup.LeftFooter = xTxt
End Sub
3. wciśnij F5 klucz do uruchomienia kodu. Następnie pojawia się okno dialogowe Kutools for Excel, wybierz wiersz, który chcesz wydrukować wielokrotnie u dołu każdej drukowanej strony, a następnie kliknij OK przycisk.
Teraz określona zawartość wiersza jest dodawana do stopki każdej drukowanej strony w bieżącym arkuszu. Możesz rozpocząć drukowanie arkusza.
Note: Jeśli chcesz wielokrotnie drukować wybraną zawartość na dole każdej strony w całym skoroszycie, możesz zastosować funkcję stopki, aby wstawić zawartość do stopki wszystkich arkuszy.
Z łatwością powtarzaj wiersze tytułów w każdym n-tym wierszu w programie Excel:
Kutools dla programu Excel's Wstaw wiersze tytułów narzędzie może pomóc ci szybko wstawić wiersz tytułu przed każdym n-tym wierszem w wybranym zakresie w programie Excel, jak pokazano na poniższym zrzucie ekranu.
Pobierz i wypróbuj teraz! (30-dniowy bezpłatny szlak)
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!