Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
как найти макрос в книге?
 
#1
29.11.2010 15:42:05
товарищи, я не большой специалист в работе с макросами, поэтому добавляю в книгу  скопированные с форума подходящие мне варианты.  
 
вот я сперва добавила красивую заставку при открытии файла, а потом попыталась вкрутить в нее пароль с логином на вход. Но на каком-то этапе оставила эту затею до лучших времен.  
 
и подозреваю, что после этого у меня при открытии файла стала выскакивать такая вот картинка (см файл).  
 
пожалуйста, максимально подробно распишите, куда залезть, чтобы найти и обезвредить этот элемент.  
 
 
заранее спасибо
 
 
 
#2
29.11.2010 16:21:54
Будет проще, если Вы покажете сам файл, а не картинку. Только следите за размером файла. Подробнее в Правилах.
 
 
 
#3
29.11.2010 16:40:56
Как прикрутить логин и пароль - можно посмотреть здесь: <BR>http://excelvba.ru/tools/Authentication
Надстройки для Excel  Парсинг сайтов  Мониторинг цен конкурентов
 
 
 
#4
29.11.2010 17:16:41
{quote}{login=Юрий М}{date=29.11.2010 04:21}{thema=}{post}Будет проще, если Вы покажете сам файл, а не картинку. Только следите за размером файла. Подробнее в Правилах.{/post}{/quote}  
 
вот я, к сожалению, никак файл не покажу, там база секретных объъектов, на ее переделку в другой вид угроблю половину времени создания -:(
 
 
 
#5
29.11.2010 17:48:19
Тогда в редакторе поиском найдите, где идёт вызов/обращение к макросу KillTheForm и удалите/закомментируйте эту строку.
 
 
 
#6
29.11.2010 17:49:45
А файл вообще можно выложить с пустыми листами - ведь нужно найти макрос, а не данные.
 
 
 
#7
29.11.2010 23:15:29
{quote}{login=Юрий М}{date=29.11.2010 05:49}{thema=}{post}А файл вообще можно выложить с пустыми листами - ведь нужно найти макрос, а не данные.{/post}{/quote}  
 
вот попыталась, но он в архиве весит больше 100 -:(  
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>
 
 
 
#8
29.11.2010 23:17:34
{quote}{login=Юрий М}{date=29.11.2010 05:48}{thema=}{post}Тогда в редакторе поиском найдите, где идёт вызов/обращение к макросу KillTheForm и удалите/закомментируйте эту строку.{/post}{/quote}  
 
а можно уточнить, как это сделать? я совсем плохо еще ориентируюсь в макросных составляющих, не нашла ни редактор, ни поиск в нем
 
 
 
#9
29.11.2010 23:18:24
{quote}{login=EducatedFool}{date=29.11.2010 04:40}{thema=}{post}Как прикрутить логин и пароль - можно посмотреть здесь: <BR>http://excelvba.ru/tools/Authentication{/post}{/quote}  
 
благодарю, я эту идею не оставляю, доделаю книгу и буду разбираться с прикручиванием -:)
 
 
 
#10
29.11.2010 23:28:27
Файл я скачал. В Вашей книге отсутствует макрос KillTheForm, который вызывается вот в этой строке:  
Application.OnTime Now + TimeValue("00:00:05"), "KillTheForm"  
Выходы из ситуации:  
1. Удалить эту строку (тогда форму придётся закрывать вручную, а не через 5 секунд).  
2. Добавить этот самый макрос.
 
 
 
#11
29.11.2010 23:42:32
{quote}{login=Юрий М}{date=29.11.2010 11:28}{thema=}{post}Файл я скачал. В Вашей книге отсутствует макрос KillTheForm, который вызывается вот в этой строке:  
Application.OnTime Now + TimeValue("00:00:05"), "KillTheForm"  
Выходы из ситуации:  
1. Удалить эту строку (тогда форму придётся закрывать вручную, а не через 5 секунд).  
2. Добавить этот самый макрос.{/post}{/quote}  
 
так, еще чуть подробней либо про добавление макроса, либо про удаление строки (с учетом моего уровня знаний, точнее незнаний, требуется разжевать).  
 
благодарю заранее
 
 
 
#12
29.11.2010 23:48:44
Вас какой вариант интересует - 1 или 2? И давайте ваш адрес - сброшу готовый файл.
 
 
 
#13
30.11.2010 00:21:04
Давайте попробуем так:  
1. Копируем эти три строки:  
Sub KillTheForm()  
   Unload UserForm1  
End Sub  
2. Жмём Alt+F11 - откроется редактор.  
3. В проводнике (в левом окне) найдём папку Modules. Откроем её.  
4. Двойной клик по Module1.  
5. Вставляем скопированное в открывшееся окно.  
Сохраняем файл, закрываем и пробуем его открыть.
 
 
 
#14
30.11.2010 08:23:55
{quote}{login=Юрий М}{date=30.11.2010 12:21}{thema=}{post}Давайте попробуем так:  
1. Копируем эти три строки:  
Sub KillTheForm()  
   Unload UserForm1  
End Sub  
2. Жмём Alt+F11 - откроется редактор.  
3. В проводнике (в левом окне) найдём папку Modules. Откроем её.  
4. Двойной клик по Module1.  
5. Вставляем скопированное в открывшееся окно.  
Сохраняем файл, закрываем и пробуем его открыть.{/post}{/quote}  
 
фантастика!!  
все получилось!!    
 
Юрий, спасибо огромное, теперь заставка сама через 5 сек улетает, все супер -:))
 
 
 
Страницы: 1
Читают тему
Наверх