Before Excel? Utskrift av regnearket, kan du kjøre under VBA-kode for å skjule tomme rader i et angitt område. Vennligst gjør som følger.
1. Trykk Alt + F11 tastene for å åpne Microsoft Visual Basic for Application vinduet.
2. I Microsoft Visual Basic for Application vindu, klikker du Sett > Modul. Og deretter kopiere og lime inn under VBA kode i Module vinduet
VBA-kode. Skjul tomme rader i valgt område
Sub HideBlankRows () Dim XRG Som Range Dim Xcell Som Range Dim xAddress As String Dim xUpdate As Boolean Dim jeg Som Long On Error Resume Next xAddress = Application.ActiveWindow.RangeSelection.Address Set XRG = Application.InputBox ("Velg et område", "Kutools for Excel", xAddress,,,,, 8) Set XRG = Application.Intersect ( XRG, ActiveSheet.UsedRange) Hvis XRG Er Nothing Then Exit Sub Hvis xRg.Areas.Count > 1 Deretter MsgBox "Ikke støtte for flere områder", "Kutools for Excel" Exit Sub End If xUpdate = Application.ScreenUpdating Application.ScreenUpdating = False For I = 1 Til xRg.Rows.Count xRg.Rows (I) .EntireRow .Hidden = (Application.CountA (xRg.Rows (I)) = 0) Neste Application.ScreenUpdating = xUpdate End Sub3. Trykk F5 for å kjøre koden, deretter en Kutools for Excel dialogboksen dukker opp, kan du deretter velger området med tomme rader du ikke ønsker å skrive ut, og klikk deretter på OK-knappen.
All blank rader i valgt område er skjult umiddelbart. Deretter kan du begynne å skrive ut regnearket uten tomme rader
. Merk: Etter utskrift kan du unhide disse tomme rader med følgende VBA-kode
VBA-kode. Skjul alle tomme rader i valgt område
Sub UnhideRows ( ) Dim XRG Som Range Dim Xcell Som Range Dim xAddress As String Dim xUpdate Som boolsk On Error Resume Next xAddress = Application.ActiveWindow.RangeSelection.Address Set XRG = Application.InputBox ("Velg et område du viser de tomme rader", " Kutools for Excel ", xAddress,,,,, 8) Set XRG = Application.Intersect (XRG, ActiveSheet.UsedRange) Hvis XRG Er Ingenting Deretter Exit Sub xUpdate = Application.ScreenUpdating Application.ScreenUpdating = False xRg.EntireRow.Hidden = False Application.ScreenUpdating = xUpdate End Sub

Slett tomme rader før utskrift med Kutools for Excel
Hvis du ønsker å skrive ut regneark uten tomme rader, anbefaler vi deg å slette alle tomme rader med slette tomme rader nytten av Kutools for Excel , og deretter kan du skrive ut regnearket manuelt
Kutools for Excel. med mer enn 120 praktiske Excel-tillegg, gratis å prøve uten begrensning i 60 dager. Gå til DownloadFree Trial 60 daysPurchasePayPal /MyCommerce 1. Klikk Kutools > Slett > Slett tomme rader og gt; I Selected Range /i Active Blad /i utvalgte Ark /In Alle blad basert på dine behov. Se skjermbilde:
Merk: For å slette tomme rader i et område, kan du velge dette området først og deretter bruke funksjonen
to.. Så en dialogboks dukker opp for å fortelle deg hvor mange rader er slettet, må du klikke på OK-knappen.
Nå er alle tomme rader er slettet. Du kan begynne å skrive ut regnearket
. Merk: Dette verktøyet støtter Angre Ctrl + Z.
Hvis dette verktøyet er nyttig, kan du laste ned og prøve den gratis prøveversjon nå!

Previous:Hvordan å telle en karakter i en Excel-celle eller et område?

Next Page:Hvordan sette sammen første bokstavene i navn /celler i Excel?