Hur skriver man ut rader flera gånger längst ner på varje utskriven sida i Excel?
Som standard har Excel en funktion för användare att skriva ut rader upprepade gånger överst. Men i vissa fall kanske du föredrar att skriva ut rader upprepade gånger längst ned på sidorna utom överst. Den här artikeln kommer att visa dig små knep.
Skriv ut rader upprepade gånger längst ner med VBA-kod
Skriv ut rader upprepade gånger längst ner med VBA-kod
Du kan köra nedanstående VBA-kod för att infoga den angivna raden i sidfoten på varje sida. Och sedan kan du skriva ut den här raden upprepade gånger längst ner på varje utskriven sida i Excel.
1. Tryck andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikation fönster.
2. I Microsoft Visual Basic för applikation dialogrutan, klicka Insert > Modulerna. Och sedan kopiera och klistra in nedanstående VBA-kod i modulfönstret.
VBA-kod: Infoga angiven rad i sidfötter på varje utskriven sida
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 Sub3. tryck på F5 nyckel för att köra koden. Då dyker en Kutools för Excel-dialogruta upp, välj raden du behöver skriva ut upprepade gånger längst ner på varje utskriven sida och klicka sedan på OK knapp.
Nu läggs det angivna radinnehållet till i sidfoten på varje utskriven sida i det aktuella kalkylbladet. Du kan börja skriva ut kalkylbladet.
Anmärkningar: Om du vill skriva ut det valda innehållet upprepade gånger längst ned på varje sida i hela arbetsboken, kan du använda sidfotsfunktionen för att infoga innehållet i sidfoten på alla ark.
Upprepa enkelt titelrader i var tionde rad i Excel:
Kutools för Excel's Infoga titelrader verktyget kan hjälpa dig att snabbt infoga titelrad före var n:e rad i ett valt område i Excel som skärmbilden nedan visas.
Ladda ner och prova nu! (30 dagars gratis spår)
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
