Модераторы: mihanik
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> перемещение макроса, из моей книги в personal.xls 
:(
    Опции темы
Stolzen
Дата 13.7.2007, 17:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1041
Регистрация: 17.10.2005

Репутация: нет
Всего: 48



Вобщем, задача такая:
Пользователь тыкает кнопку "Install", модуль и форма копируются из моей книги в книгу personal.xls
Как это реализовать???


--------------------
datatalks.ru - анализ данных, статистика, машинное обучение
PM MAIL WWW   Вверх
Naghual
Дата 13.7.2007, 17:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 7
Всего: 49



Так как написано - никак.
Проще скопировать содержимое Персонал в свою книгу.


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Stolzen
Дата 13.7.2007, 17:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1041
Регистрация: 17.10.2005

Репутация: нет
Всего: 48



Цитата(Naghual @  14.7.2007,  01:21 Найти цитируемый пост)
Проще скопировать содержимое Персонал в свою книгу. 

В том-то и дело, что нужно не копированием
Каждый раз объяснять, как копировать и т.д. затруднительно

Цитата(Naghual @  14.7.2007,  01:21 Найти цитируемый пост)
Так как написано - никак.

Все-таки решение должно быть...


--------------------
datatalks.ru - анализ данных, статистика, машинное обучение
PM MAIL WWW   Вверх
Дмит
Дата 13.7.2007, 19:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 117
Регистрация: 21.4.2006
Где: г.Волгоград

Репутация: 8
Всего: 9



Проще наверное сделать отдельную установочную прогу (книгу).
Можно например и так:
ActiveWorkbook.SaveCopyAs Application.StartupPath & "\" & ActiveWorkbook.Name
просто положить Вашу (активную) книгу в папку Startup, не трогая Personal. Макросы и форма будут доступны.

PM MAIL WWW   Вверх
Stolzen
Дата 14.7.2007, 12:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1041
Регистрация: 17.10.2005

Репутация: нет
Всего: 48



Спасибо, сейчас попробую!!

Добавлено через 10 минут и 32 секунды
Ну скопировал.
Получается, что теперь моя книга каждый раз открывается при запуске Экселя... Что делать?


--------------------
datatalks.ru - анализ данных, статистика, машинное обучение
PM MAIL WWW   Вверх
Дмит
Дата 14.7.2007, 17:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 117
Регистрация: 21.4.2006
Где: г.Волгоград

Репутация: 8
Всего: 9



То, что и требовалось - макросы и формы доступны. Personal тоже запускается при старте Excel.
Если Вам не нужна видимость книги, то её лучше сделать надстройкой.
PM MAIL WWW   Вверх
Stolzen
Дата 14.7.2007, 19:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1041
Регистрация: 17.10.2005

Репутация: нет
Всего: 48



Цитата(Дмит @  15.7.2007,  01:53 Найти цитируемый пост)
Если Вам не нужна видимость книги, то её лучше сделать надстройкой.

Можно, пожалуйста, по-подробнее? Спасибо


--------------------
datatalks.ru - анализ данных, статистика, машинное обучение
PM MAIL WWW   Вверх
Дмит
Дата 16.7.2007, 18:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 117
Регистрация: 21.4.2006
Где: г.Волгоград

Репутация: 8
Всего: 9



Например, так:

ThisWorkbook.IsAddin = True
ThisWorkbook.SaveCopyAs Application.StartupPath & "\" & ThisWorkbook.Name
ThisWorkbook.IsAddin = False

Книга просто будет скрыта. 
Предупреждаю - код корявый. Лучше смотри литературу о надстройках (*.xla), их создании и правильной установке.
PM MAIL WWW   Вверх
Stolzen
Дата 16.7.2007, 22:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1041
Регистрация: 17.10.2005

Репутация: нет
Всего: 48



ОК, попробую

Добавлено через 5 минут и 3 секунды
Спасибо, работает! Книга действительно невидимая. Даже если ее просто так щас запускать  smile 


--------------------
datatalks.ru - анализ данных, статистика, машинное обучение
PM MAIL WWW   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Программирование, связанное с MS Office"
mihanik staruha

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами



  • Несанкционированная реклама на форуме запрещена
  • Пожалуйста, давайте своим темам осмысленный, информативный заголовок. Вопль "Помогите!" таковым не является.
  • Чем полнее и яснее Вы изложите проблему, тем быстрее мы её решим.
  • Оставляйте свои записи в "Книге отзывов о работе администрации"
  • А вот тут лежит FAQ нашего подраздела


Если Вам понравилась атмосфера форума, заходите к нам чаще!
С уважением mihanik и staruha.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Программирование, связанное с MS Office | Следующая тема »


 




[ Время генерации скрипта: 0.0531 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.