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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Скопировать xls 
:(
    Опции темы
Izuver
Дата 22.9.2006, 21:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 352
Регистрация: 13.6.2006
Где: Омск

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



Открываем книгу, с этой нужно сделать ее копию за не большим исключением:
убрать определенные коды, листы, элементы и т.д., назвать ее как следует и положить рядом с исходником.

Так вот я не знаю как сделать копию и убрать коды(модуль, формы)
PM MAIL ICQ   Вверх
Staruha
Дата 23.9.2006, 13:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1292
Регистрация: 1.2.2004
Где: Казань

Репутация: 13
Всего: 27



Сохранить как.Затем заходишь на VB  и удаляешь коды.

Это сообщение отредактировал(а) Staruha - 23.9.2006, 13:24


--------------------
Возмездие настигнет
PM MAIL   Вверх
likhobory
Дата 23.9.2006, 16:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 466
Регистрация: 17.5.2005
Где: Москва

Репутация: 10
Всего: 20



если програмно - то так (работаем с текущим проектом):
Удаление строки из модуля
Код

Application.VBE.ActiveVBProject.VBComponents("MyModule").CodeModule.DeleteLines 1

Удаление модуля
Код

Application.VBE.ActiveVBProject.VBComponents.Remove _
Application.VBE.ActiveVBProject.VBComponents("userform1")



--------------------
PM MAIL   Вверх
Дмит
Дата 23.9.2006, 20:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



По моему проще скопировать необходимые данные в новую книгу. А VBProject не трогать.
PM MAIL WWW   Вверх
likhobory
Дата 24.9.2006, 22:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 466
Регистрация: 17.5.2005
Где: Москва

Репутация: 10
Всего: 20



Цитата(Дмит @  23.9.2006,  20:00 Найти цитируемый пост)
По моему проще

зависит от конкретной ситуации, в любом случае выбор - за автором топика




--------------------
PM MAIL   Вверх
Izuver
Дата 25.9.2006, 22:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 352
Регистрация: 13.6.2006
Где: Омск

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



Цитата(likhobory @ 23.9.2006,  16:16)

Удаление строки из модуля
Код

Application.VBE.ActiveVBProject.VBComponents("MyModule").CodeModule.DeleteLines 1


Как здесь модуль звать? И как же "Sub qw()"? в смысле его удаление?

А тут я думал речь идет про форме:
Цитата(likhobory @ 23.9.2006,  16:16)

Удаление модуля
Код

Application.VBE.ActiveVBProject.VBComponents.Remove _
Application.VBE.ActiveVBProject.VBComponents("userform1")



Но всеж, и тот, и этот не проходит у меня код.

Это сообщение отредактировал(а) Izuver - 25.9.2006, 22:48
PM MAIL ICQ   Вверх
likhobory
Дата 26.9.2006, 09:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 466
Регистрация: 17.5.2005
Где: Москва

Репутация: 10
Всего: 20



Цитата(Izuver @  25.9.2006,  23:32 Найти цитируемый пост)
А тут я думал речь идет про форме

все верно, только не забудь использовать РЕАЛЬНОЕ имя модуля формы/класса и т.д.

Цитата(Izuver @  25.9.2006,  23:32 Найти цитируемый пост)
Как здесь модуль звать?

в моем случае - MyModule, обрати внимание на "userform1"- это код удаления ВСЕГО МОДУЛЯ, а не отдельной процедуры


Это сообщение отредактировал(а) likhobory - 26.9.2006, 09:49


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

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

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

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



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


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

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


 




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


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

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