коллеги, благодаря вашей мудрости и опыту уже давно пользую следующий код:
Private Sub Workbook_Open()
'выделяет цветом ярлыки незапароленных листов
'делает активным первый лист
'запускается сам при открытии книги
For Each i In Sheets
If i.ProtectContents Then i.Tab.ColorIndex = -4142 Else i.Tab.ColorIndex = 3
Next
Sheets(1).Activate
End Sub
а не доработаете его напильником, чтобы КАЖДЫЙ лист в данной книге, был виден сначала...
поясню, на большинстве листов в этой книге есть таблица с данными, есть ссылка на бланк, который находится на этом же листе, но гораздо правее... и вот барышни вносят в таблицу данные, переходят к бланку, дозаполняют его и жмакают на кнопку макроса, который сохраняет бланк в отдельной книге. а обратно не возвращаются.
и вот откроешь книгу, она выкинет тебе содержание, переходишь на нужный лист... а он в положении "бланк".
ломает каждый раз по ссылке "вернуться к таблице" тыкать :-)
возможно такое?
Private Sub Workbook_Open()
'выделяет цветом ярлыки незапароленных листов
'делает активным первый лист
'запускается сам при открытии книги
For Each i In Sheets
If i.ProtectContents Then i.Tab.ColorIndex = -4142 Else i.Tab.ColorIndex = 3
Next
Sheets(1).Activate
End Sub
а не доработаете его напильником, чтобы КАЖДЫЙ лист в данной книге, был виден сначала...
поясню, на большинстве листов в этой книге есть таблица с данными, есть ссылка на бланк, который находится на этом же листе, но гораздо правее... и вот барышни вносят в таблицу данные, переходят к бланку, дозаполняют его и жмакают на кнопку макроса, который сохраняет бланк в отдельной книге. а обратно не возвращаются.
и вот откроешь книгу, она выкинет тебе содержание, переходишь на нужный лист... а он в положении "бланк".
ломает каждый раз по ссылке "вернуться к таблице" тыкать :-)
возможно такое?