Application.ActiveWorkbook.Name
Для работы с листами книги используется коллекция Sheets. Нужно сначала указать книгу, а затем коллекцию Sheets: Application.Workbook("test2.xls").Sheets.Count
Попробуйте сделать подобную программу для добавления и удаления листов в книге. Должно получиться как показано на рис.6:
Рис.6. Добавление и удаление листов в книгу "test2.xls".
Так как возможно при решении каких-то задач нужно будет проводить манипуляции с листами, то рассмотрим добавление листов подробне. Для добавления листов в книгу в коллекции листов также применяется метод Add. Этот метод можно применять с четырьмя необязательными параметрами Add [ Before, After, Count, Type ].
Before- Перед каким листом и After- после какого листа добавлять новый.
Count- Кол-во добавляемых листов.
Type- Тип добавляемого листа (например xlWorkSheet - для расчетного листа, xlChart- для диаграммы).
Для добавления листа в конец книги код может быть следующим:
' в общем разделе нужно декларировать константу NBook
Const NBook="test2.xls"
Дата добавления: 2015-12-17; просмотров: 12; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!