2015-04-09 6 views
2

У меня есть книга Excel с двумя рабочими листами.
На первом у меня есть «форма» и на секунд все данные в таблице.Печать динамической страницы Excel с меняющимся контентом

Что я сделал, так это то, что на первом листе я меняю Идентификационный номер, затем функция просматривает второй лист, чтобы найти идентификационный номер, а затем меняет данные на ячейки, которые я указал тем, кто на вторая страница.
Это для оплаты работникам компании, и в настоящее время 50 уникальных идентификаторов.

Есть ли способ распечатать первый лист с различным контентом одним нажатием, если это возможно? Кто-нибудь знает, как это сделать?

+0

Является ** Идентификационные номера ** хранятся где-то? Как в ряде ячеек. –

+0

Активируйте рабочий лист, который вы хотите распечатать, а затем просто используйте «ActiveSheet.Printout» и распечатает одну копию активного листа с использованием принтера по умолчанию. –

+1

@ branislav-kollár Идентификационные номера хранятся в левом нижнем углу таблицы вторых страниц. Я использую функцию vlookup для поиска идентификатора, а затем извлекает данные из этой таблицы. – LamboLighting

ответ

0

Вы можете использовать что-то вроде этого For each myCell in worksheets(2).range("A1:A50")...next myCell для перебора всех сохраненных клеток с различными идентификаторами и поставить каждое значение в ячейку на листе 1.
Это то, что я имею в виду

Sub PrintAll_IDs() 
    For Each myCell In Worksheets(2).Range("A1:A50") 'range with stored ID's 
     Worksheets(1).Range("A1") = myCell.value ' "A1" is the cell with ID that you change manually now 
     Worksheets(1).PrintOut ' I'm not sure how to print using VBA, just showing the workflow 
    Next myCell 
End Sub 
+0

Спасибо большое! Это было именно то, что я хотел сделать, и это сработало отлично! Вы спасли меня так много времени, чтобы изменить значение и распечатать снова и снова! – LamboLighting