Les galetes ens ajuden a lliurar els nostres serveis. En utilitzar els nostres serveis, accepteu el nostre ús de cookies.
Consell: altres idiomes es tradueixen en Google. Pots visitar el English versió d'aquest enllaç.
Iniciar Sessió
x
or
x
x
Registre
x

or

Com configurar l'àrea d'impressió a la darrera fila d'Excel?

En Excel, de manera predeterminada, configurarà tot el full de treball fins a l'última fila amb dades com a àrea d'impressió. Però, en aquest cas, vull imprimir des de la columna A fins a la columna C fins a l'última fila amb les dades que es mostren a continuació, hi ha alguna manera de fer-ho?
doc imprimeix la darrera fila 1
doc imprimeix la darrera fila 2

Estableix l'àrea d'impressió a l'última fila amb dades de la selecció d'impressió

Estableix l'àrea d'impressió a l'última fila amb les dades de VBA


Estableix l'àrea d'impressió a l'última fila amb dades de la selecció d'impressió


Per imprimir una selecció a la darrera fila amb dades, podeu canviar l'àrea d'impressió a la selecció especificada abans d'imprimir.

1. Espera Ctrl a continuació, seleccioneu les columnes que voleu imprimir. Mostra la captura de pantalla:
doc imprimeix la darrera fila 3

2. clic Dossier > impressió, i després trieu Selecció d'impressió des ajust secció. Mostra la captura de pantalla:
doc imprimeix la darrera fila 4


Estableix l'àrea d'impressió a l'última fila amb les dades

Aquí també introdueix un codi de macro per fer aquesta operació.

1. Activa el full que fas servir, premeu Alt + F11 claus per obrir Microsoft Visual Basic per a aplicacions finestra i feu clic Insereix > Mòduls. Veure captura de pantalla.
doc imprimeix la darrera fila 5

2. Enganxeu el codi següent al Mòduls script i premeu F5 clau per executar.

VBA: estableix l'àrea a la darrera fila

'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

doc imprimeix la darrera fila 6

3. Apareix un quadre de diàleg per recordar-vos que seleccioneu l'interval de columnes que voleu utilitzar. Mostra la captura de pantalla:
doc imprimeix la darrera fila 7

4. clic OK, s'ha configurat l'àrea d'impressió.


bona idea 4Seleccioneu Last Cells

Kutools' Seleccioneu Last Cells la funció us pot ajudar ràpidament a seleccionar l'última cel·la o l'última columna o última fila.
doc seleccioneu la darrera cel·la


Eines de productivitat recomanades

Pestanya d'Office

estrella d'or1 Porteu les pestanyes pràctiques a l'Excel i a un altre programari d'Office, igual que Chrome, Firefox i el nou Internet Explorer.

Kutools for Excel

estrella d'or1 Increïble! Incrementeu la productivitat en 5 minuts. No necessites cap habilitat especial, estalvieu dues hores cada dia.

estrella d'or1 300 Noves característiques per a Excel, Excel molt fàcil i potent:

  • Combina cel·les / files / columnes sense perdre dades.
  • Combina i consolida diverses fulles i llibres.
  • Comparar intervals, copiar diversos rangs, convertir text a data, unitat i conversió de divises.
  • Compte per colors, subtotals de paginació, classificació avançada i filtre súper,
  • Més Seleccioneu / Insereix / Suprimeix / Text / Format / Enllaç / Comentari / Llibres / Eines de full de càlcul ...

Tret de pantalla de Kutools per a Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.