Как распечатать таблицу Excel с выпадающим на той же странице? - PullRequest
0 голосов
/ 22 января 2020

У меня есть лист Excel, содержащий таблицу с раскрывающимся списком в одной из ячеек. Также есть кнопка, содержащая код для перебора всех параметров раскрывающегося списка и отправки таблицы на печать каждый раз. Однако каждый раз, когда таблица отправляется на печать, на всю страницу печатается только одна таблица. Стол довольно маленький, так что на это тратится много бумаги. Есть ли способ разместить несколько таблиц на одной странице?

Это мой текущий код:

Sub Iterate_Through_Data_Validation()
    Dim xRg As Range
    Dim xCell As Range
    Dim xRgVList As Range
    Set xRg = Worksheets("Print").Range("C2")
    Set xRgVList = Evaluate(xRg.Validation.Formula1)
    For Each xCell In xRgVList
        xRg = xCell.Value
        ActiveSheet.PrintOut
    Next
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...