You kan kjøre under VBA-kode for å sette inn den angitte rad i bunnen av hver side. Og så kan du skrive ut denne raden gjentatte ganger nederst på hver utskrevne siden i Excel.
En. Trykk ALT + F11 tastene samtidig for å åpne Microsoft Visual Basic for Application vinduet.
2. I Microsoft Visual Basic for Application dialogvinduet klikker Sett > Modul. Og deretter kopiere og lime inn nedenfor VBA kode i Module vinduet
VBA-kode. Sett angitt rad til bunntekst av hver utskrevne side
Sub MyFooter () Dim xTxt As String Dim xAddress As String Dim XRG Som Range Dim Xcell Som Range On Error Resume Next xAddress = ActiveWindow.RangeSelection.Address Set XRG = Application.InputBox ("Velg den raden du vil sette inn flere ganger nederst:", "Kutools for Excel", xAddress,,,,, 8) Hvis XRG Er Ingenting Deretter Exit Sub For Hver Xcell I XRG xTxt = xTxt & xCell.Value & "" Neste ActiveSheet.PageSetup.LeftFooter = xTxt End Sub3. Trykk F5 for å kjøre koden. Så en Kutools for Excel dialogboksen dukker opp, velger du raden du trenger å skrive ut flere ganger nederst på hver utskrevne siden, og klikk deretter på OK-knappen.
Nå de angitte rad innholdet er lagt til bunnteksten på hver utskrevet side i gjeldende regneark. Du kan begynne å skrive ut regnearket
. Merk: Hvis du ønsker å skrive ut det valgte innholdet gjentatte ganger på bunnen av hver side innenfor hele arbeidsboken, kan du søke bunnteksten funksjonen til å sette innholdet inn i bunnteksten på alle ark