Как распечатать все варианты в выпадающем списке в Excel?
Вы когда-нибудь пытались распечатать все параметры в раскрывающемся списке на листе Excel? В этой статье говорится о печати всех параметров из выпадающего списка в отдельной распечатке в Excel.
Распечатать все параметры в раскрывающемся списке с кодом VBA
Распечатать все параметры в раскрывающемся списке с кодом VBA
Следующий код VBA может помочь вам распечатать все параметры в раскрывающемся списке на листе. Пожалуйста, сделайте следующее.
1. нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окно, пожалуйста, нажмите Вставить > Модули. Затем скопируйте следующий код VBA в окно модуля. Смотрите скриншот:
Код VBA: распечатать все параметры в указанном раскрывающемся списке в отдельной распечатке
Sub Iterate_Through_data_Validation()
Dim xRg As Range
Dim xCell As Range
Dim xRgVList As Range
Set xRg = Worksheets("Sheet1").Range("B8")
Set xRgVList = Evaluate(xRg.Validation.Formula1)
For Each xCell In xRgVList
xRg = xCell.Value
ActiveSheet.PrintOut
Next
End Sub
Внимание: В коде Sheet1 - это имя рабочего листа, который содержит раскрывающийся список, который вы хотите распечатать. А B8 - это ячейка, содержащая раскрывающийся список. Пожалуйста, замените их необходимыми.
3. нажмите F5 ключ для запуска кода.
Затем все параметры в указанном раскрывающемся списке на определенном листе распечатываются отдельно.
С легкостью распечатайте указанные страницы на текущем листе в Excel:
Для Печать определенных страниц полезности Kutools for Excel, вы можете легко распечатать указанные страницы в текущем листе, например напечатать все нечетные страницы, все даже страницы, распечатайте просто текущая страница, а также распечатать настраиваемый диапазон страниц, как показано ниже.
Скачайте и попробуйте прямо сейчас! (30-дневный бесплатный пробный период)
Статьи по теме:
- Как автоматически заполнять другие ячейки при выборе значений в раскрывающемся списке Excel?
- Как выполнить автозаполнение при вводе в раскрывающемся списке Excel?
- Как создать календарь с выпадающим списком в Excel?
- Как создать выпадающий список с возможностью поиска в Excel?
- Как создать раскрывающийся список с множественным выбором или значениями в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!