Количество листов в новой книге Excel
У меня такой вопрос:
Возможно ли при запуске Excel из программы VB6 оговорить количество листов, которое будет в новой книге (т.е. игнорировать соответствующие настройки Excel)? Если возможно, то каким образом?
Заранее спасибо.
При запуске Excel новая книга открывается с таким числом листов, какое установлено в настройках программы (меню Сервис\Параметры...; вкладка "Общие").
У меня такой вопрос:
Возможно ли при запуске Excel из программы VB6 оговорить количество листов, которое будет в новой книге (т.е. игнорировать соответствующие настройки Excel)? Если возможно, то каким образом?
Заранее спасибо.
токо если залезть в реестр а там заранее подправить, но это не очень хорошая идея...
А так, какие проблемы, сам ему Excel открываешь, книгу новую создаешь, лишние листы убираешь/добавляешь, Excel показываешь (да он и так ничего не успеет увидеть...)
токо если залезть в реестр а там заранее подправить, но это не очень хорошая идея...
А так, какие проблемы, сам ему Excel открываешь, книгу новую создаешь, лишние листы убираешь/добавляешь, Excel показываешь (да он и так ничего не успеет увидеть...)
А если у кого-то на каждое удаление листа вылетает месседжбокс, требующий подтверждения? Можно как-либо это предусмотреть и избавить пользователя от этого диалога?
Application.SheetsInNewWorkbook = n
Большое спасибо. Все работает именно так, как и было нужно.
Но для общего развития, хотелось бы знать ответ и на второй вопрос:
Если у кого-то на каждое удаление листа вылетает месседжбокс, требующий подтверждения? Можно как-либо это предусмотреть и избавить пользователя от этого диалога?
Worksheets(1).Delete
Applicatoin.DisplayAlerts = True
и эта сволочь даже не пикнет...
это косается всех диалогов?
Можно будет закрыть книгу без сохранения и без предупреждений? А перезаписать?
To Cutty Sark:
это косается всех диалогов?
Можно будет закрыть книгу без сохранения и без предупреждений? А перезаписать?
Очень многих. Точно знаю про перетаскивание (хотите заменить содержимое конечных ячеек?), удаление листа. Про выход без сохранения я нкиогда не интересовался, потому что и без этого можно выходить как хочешь:
ThisWorkbook.Close SaveChanges:=False/True - о чём еще мечтать?
И в отличие от Application.ScreenUpdating свойство .DisplayAlerts само после окончания работы макроса не восстанавливается. Поэтому можно юзера лишить последнего оплота. Так что аккуратней!
ThisWorkbook.Close SaveChanges:=False/True
знаю...
просто думал одним зайцем всех выстрелов убить
:D