Come impostare l'area di stampa sull'ultima riga in Excel?

In Excel, per impostazione predefinita, imposterà l'intero foglio di lavoro fino all'ultima riga con i dati come area di stampa. Ma in questo caso, voglio stampare dalla colonna A alla colonna C fino all'ultima riga con i dati come mostrato nell'immagine sottostante, ci sono modi per gestirlo?

Imposta l'area di stampa sull'ultima riga con i dati tramite Selezione di stampa

Imposta l'area di stampa sull'ultima riga con i dati di VBA

Imposta l'area di stampa sull'ultima riga con i dati tramite Selezione di stampa

Per stampare una selezione sull'ultima riga con i dati, è possibile modificare l'area di stampa sulla selezione specificata prima della stampa.

1. Aspetta Ctrl quindi selezionare le colonne che si desidera stampare. Vedi screenshot:

2. Clic Compila il > Stampae quindi scegliere Stampa selezione dal Configurazione sezione. Vedi screenshot:

Imposta l'area di stampa sull'ultima riga con i dati

Qui presento un codice macro per fare anche questa operazione.

1. Abilitare il foglio che si utilizza, premere Alt + F11 chiavi per aprire Microsoft Visual Basic, Applications Edition finestra e fare clic su inserire > Moduli. Vedi screenshot.

2. Incolla sotto il codice nel file Moduli script e premete F5 chiave per correre.

VBA: imposta l'area sull'ultima riga

'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. Viene visualizzata una finestra di dialogo per ricordare di selezionare l'intervallo di colonne che si desidera utilizzare. Vedi screenshot:

4. Clic OK, l'area di stampa è stata impostata.