Як встановити для області друку останній рядок у Excel?

У Excel за замовчуванням він встановлюватиме весь аркуш до останнього рядка з даними як область друку. Але в цьому випадку я хочу надрукувати з стовпця А в стовпець С до останнього рядка з даними, як показано на знімку екрана, чи є способи обробки?

Встановіть область друку в останній рядок із даними за допомогою функції Вибір друку

Встановіть область друку до останнього рядка з даними VBA

---

Встановіть область друку в останній рядок із даними за допомогою функції Вибір друку

Щоб надрукувати виділення до останнього рядка з даними, перед друком можна змінити область друку на вказаний вибір.

1 Тримайся Ctrl потім виберіть стовпці, які потрібно надрукувати. Дивіться знімок екрана:

2. клацання філе > друк, а потім виберіть Вибір друку від Установка розділ. Дивіться знімок екрана:

---

Встановіть область друку в останній рядок із даними

Тут я ввожу макрокод, щоб зробити цю операцію теж.

1. Увімкніть аркуш, який ви використовуєте, натисніть Alt + F11 клавіші, щоб відкрити Microsoft Visual Basic для додатків вікно та натисніть Insert > Модулі. Дивіться знімок екрана.

2. Вставте код нижче в Модулі сценарію та натисніть F5 ключ для запуску.

VBA: встановіть для області останній рядок

'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. Вискакує діалогове вікно, яке нагадує вам про вибір діапазону стовпців, який ви хочете використовувати. Дивіться знімок екрана:

4. клацання OK, область друку встановлена.