Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.71/14: Рейтинг темы: голосов - 14, средняя оценка - 4.71
0 / 0 / 0
Регистрация: 06.12.2006
Сообщений: 10
1

Как удалить все макросы из книги, если они есть?

07.12.2006, 20:25. Просмотров 2702. Ответов 4
Метки нет (Все метки)

подскажите как удалить все макросы из книги, если они есть?
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.12.2006, 20:25
Ответы с готовыми решениями:

Удалить слова, заканчивающиеся на букву «к», если они есть
3.3. Удалить слова, заканчивающиеся на букву «к», если они есть.

Удалить все строки, если они состоят только из пятёрок
Плииз помогите...

В строке все буквы «а» заменить буквой «б» и наоборот,если они есть
1.В строке все буквы «а» заменить буквой «б» и наоборот,если они есть 2. определить,является ли...

Удалить из файла все цифры, если они следуют после знаков препинания.
Дан файл, содержащий символы. Удалить из файла все цифры, если они следуют после знаков препинания....

4
5 / 5 / 3
Регистрация: 17.10.2007
Сообщений: 1,119
07.12.2006, 21:33 2
Это пример удаления кода из модуля Module1
Private Sub DeleteCode()
With ThisWorkbook.VBProject.VBComponents("Module1").CodeModule
.DeleteLines 1, .CountOfLines
End With
End Sub
VladConn
0
0 / 0 / 0
Регистрация: 06.12.2006
Сообщений: 10
08.12.2006, 12:42  [ТС] 3
дело в том, что нужно удалить вообще весь макрос, который у меня запускает форму и по дефолту называется FormsRun. через меню его можно удалить, а как програмно это сделать?
0
5 / 5 / 3
Регистрация: 17.10.2007
Сообщений: 1,119
08.12.2006, 19:07 4
Так я же вам показал как удалять код. Показал, какими классами это делается. Вы пытались использовать объектные модели VBProject, VBComponents и CodeModule? Вы их посмотрели? Какой у вас код?
0
0 / 0 / 1
Регистрация: 11.10.2010
Сообщений: 363
17.01.2007, 20:04 5
to VladConn: Попробовал Ваш пример. на строке

With ThisWorkbook.VBProject.VBComponents(2).CodeModule



ошибка: метод VBProject объекта Workbook failed



С уважением,
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.01.2007, 20:04

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Удалить все элементы с заданным значением, если они имеются в массиве. И добавить 1 к четным элементом
Не могу справится с заданием!!! Удалить все элементы с заданным значением, если они имеются в...

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

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

Серверные кукисы - есть ли они в ASP и если да, то как с ними можно работать?
есть ли они в ASP и если да, то как с ними можно работать?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.