Hvordan indstilles udskriftsområdet til sidste række i Excel?
I Excel indstiller det som standard hele regnearket indtil sidste række med data som udskrivningsområde. Men i dette tilfælde vil jeg udskrive fra kolonne A til kolonne C indtil den sidste række med data som vist nedenfor, er der nogen måder at håndtere det på?
Indstil udskrivningsområdet til den sidste række med data ved udskrivningsvalg
Indstil udskrivningsområdet til den sidste række med data fra VBA
Indstil udskrivningsområdet til den sidste række med data ved udskrivningsvalg
Hvis du vil udskrive et valg til den sidste række med data, kan du ændre udskriftsområdet til det angivne valg inden udskrivning.
1. Holde Ctrl vælg derefter de kolonner, du vil udskrive. Se skærmbillede:
2. klik File (Felt) > Print, og vælg derefter Udskriv valg fra Lokal område afsnit. Se skærmbillede:
Indstil udskrivningsområdet til den sidste række med data
Her introducerer jeg en makrokode for også at udføre denne operation.
1. Aktivér det ark, du bruger, tryk på Alt + F11 taster for at åbne Microsoft Visual Basic til applikationer vindue og klik indsatte > Moduler. Se skærmbillede.
2. Indsæt nedenstående kode i Moduler script, og tryk på F5 nøgle til at køre.
VBA: Indstil område til sidste række
'UpdatebyExtendoffice20170811
Dim xRg As Range
Dim xRgLRow As Long
Dim xRgAddress As String
On Error Resume Next
xRgAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select a range：", "KuTools For Excel", xRgAddress, , , , , 8)
xRg.Select
xRgLRow = xRg.SpecialCells(xlCellTypeLastCell).Row
xRgAddress = Left(xRg.Address(1, 1), Len(xRg.Address(1, 1)) - 2)
xRgAddress = xRgAddress & xRgLRow
ActiveSheet.PageSetup.PrintArea = xRgAddress
End Sub
3. Der vises en dialogboks, der minder dig om at vælge det kolonneområde, du vil bruge. Se skærmbillede:
4. klik OK, udskriftsområdet er indstillet.
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
