Kanskje du ikke er kjent med VBA kjører før, men med den følge trinnene kan du vite hvordan du skal kjøre VBA for å sette inn et sideskift hvert X rader. Her vil jeg sette inn et sideskift i hver 3 rader.
1. Trykk Alt + F11 for å vise Microsoft Visual Basic for Applications vinduet.
2. I vinduet klikker du Sett inn > Modul for å vise en ny modul vindu, og deretter kopiere følgende VBA-kode i modulvinduet
VBA:.. Sett inn sideskift i hvert X rader i et regneark
Sub InsertPageBreaks () 'Updateby20140618Dim xLastrow Som LongDim xWs Som WorksheetSet xWs = Application.ActiveSheetxRow = Application.InputBox ("rad", xTitleId, "", Type: = 1) xWs.ResetAllPageBreaksxLastrow = xWs.Range. ("A1") SpecialCells (xlCellTypeLastCell) .RowFor i = xRow + 1 Å xLastrow Step xRow xWs.HPageBreaks.Add før: = xWs.Cells (i, 1) NextEnd Sub
3. Klikk Kjør-knappen og en dialogboks spretter ut for deg å spesifisere hvert X rader du vil sette inn et sideskift i. Her setter jeg inn sideskift i hver 3 rader. Se skjermbilde:
4. Klikk OK, og deretter vil det sette inn et sideskift i hvert X rader.
Batch innsats sideskift etter hver x rader med Kutools for Excel
Hvis du har Kutools for Excel installert, kan dens Split til Columns verktøyet hjelpe deg batch sette inn flere sideskift etter hver x rader med å holde tittelen i hver side lett i Excel.
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Les mer Gratis nedlasting nå
1. Klikk på Enterprise > Split til kolonner.
2. I åpnings Split til kolonner i dialogboksen, må du:
(1) Klikk på knappen Bla i Titler rekkevidde, og velg tittelen rad i det angitte området som du vil batch innsats sideskift <. br>
(2) Klikk på knappen Bla i Dato rekkevidde, og velg området som du vil batch sette inn sideskift.
(3) i radene pr trykt side skriver du inn et tall .
For eksempel, hvis du trenger å sette inn sideskift etter hver 3 p, vennligst skriv tre inn i boksen; Hvis du trenger å inerte sideskift etter hver rad, vennligst skriv 1.
(4) Tast 1 inn i Antall segmenter boks.
3. Klikk på OK-knappen.
Nå vil du se serien er kopiert inn i et nytt regneark og sideskift blir lagt til etter hvert x rader med keeping utvalg tittel. Du kan også bytte til sideskiftvisning visning ved å klikke View > Page Break Forhåndsvisning for å se disse sideskift. Se skjermbildet under:
Gratis Last ned Kutools for Excel Nå
Sett inn sideskift etter hver x rader med Kutools for Excel
Kutools for Excel utvikler annen Sett inn sideskift Hver Row verktøyet som spesialiserer seg på å sette inn sideskift etter hver x rader og nytelse.
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Les mer Gratis nedlasting nå
1. Velg området som du vil sette inn sideskift etter hver x rader, og klikk på Enterprise > Utskrift > Sett inn sideskift hver rad.
2. I åpnings Sett inn sideskift Hver Row dialogboksen angi intervallet rader som du vil sette inn sideskift på, og klikk på OK-knappen.
Da vil du se sideskift blir satt inn på den angitte intervallet rader på en gang
Gratis Last ned Kutools for Excel Nå