![]() |
|
Модераторы: mihanik |
![]()
|
|
| Stolzen |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1041 Регистрация: 17.10.2005 Репутация: нет Всего: 48 |
Вобщем, задача такая:
Пользователь тыкает кнопку "Install", модуль и форма копируются из моей книги в книгу personal.xls Как это реализовать??? |
|||
|
||||
| Naghual |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1893 Регистрация: 15.5.2004 Где: Украина, Днепр Репутация: 7 Всего: 49 |
Так как написано - никак.
Проще скопировать содержимое Персонал в свою книгу. -------------------- Я желаю всем Счастья! |
|||
|
||||
| Stolzen |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1041 Регистрация: 17.10.2005 Репутация: нет Всего: 48 |
В том-то и дело, что нужно не копированием Каждый раз объяснять, как копировать и т.д. затруднительно Все-таки решение должно быть... |
|||
|
||||
| Дмит |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 117 Регистрация: 21.4.2006 Где: г.Волгоград Репутация: 8 Всего: 9 |
Проще наверное сделать отдельную установочную прогу (книгу).
Можно например и так: ActiveWorkbook.SaveCopyAs Application.StartupPath & "\" & ActiveWorkbook.Name просто положить Вашу (активную) книгу в папку Startup, не трогая Personal. Макросы и форма будут доступны. |
|||
|
||||
| Stolzen |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1041 Регистрация: 17.10.2005 Репутация: нет Всего: 48 |
Спасибо, сейчас попробую!!
Добавлено через 10 минут и 32 секунды Ну скопировал. Получается, что теперь моя книга каждый раз открывается при запуске Экселя... Что делать? |
|||
|
||||
| Дмит |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 117 Регистрация: 21.4.2006 Где: г.Волгоград Репутация: 8 Всего: 9 |
То, что и требовалось - макросы и формы доступны. Personal тоже запускается при старте Excel.
Если Вам не нужна видимость книги, то её лучше сделать надстройкой. |
|||
|
||||
| Stolzen |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1041 Регистрация: 17.10.2005 Репутация: нет Всего: 48 |
Можно, пожалуйста, по-подробнее? Спасибо |
|||
|
||||
| Дмит |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 117 Регистрация: 21.4.2006 Где: г.Волгоград Репутация: 8 Всего: 9 |
Например, так:
ThisWorkbook.IsAddin = True ThisWorkbook.SaveCopyAs Application.StartupPath & "\" & ThisWorkbook.Name ThisWorkbook.IsAddin = False Книга просто будет скрыта. Предупреждаю - код корявый. Лучше смотри литературу о надстройках (*.xla), их создании и правильной установке. |
|||
|
||||
| Stolzen |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1041 Регистрация: 17.10.2005 Репутация: нет Всего: 48 |
ОК, попробую
Добавлено через 5 минут и 3 секунды Спасибо, работает! Книга действительно невидимая. Даже если ее просто так щас запускать |
|||
|
||||
![]()
|
| Правила форума "Программирование, связанное с MS Office" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще!
|
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Программирование, связанное с MS Office | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |