|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
29.08.2016, 10:08 | #1 |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Private Sub Workbook_Open()
Привет Друзья!
Как всегда с ламерской проблемой... Нужна динамичная функция Now() , которая будет работать (визуально) в конкретной книге, тесть менять время (по-секундам). Сделал такой простой макрос: Код:
Код:
Есть идеи?
Jungo must die!!! (C) Bill Gates.
|
29.08.2016, 10:18 | #2 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
|
|
29.08.2016, 10:51 | #3 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
Код:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
29.08.2016, 11:16 | #4 |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Спасибо друг!
Теперь другая проблема Открываю другую книгу, все ОК, закрываю книгу с макросом, она открывается сама, все время
Jungo must die!!! (C) Bill Gates.
|
29.08.2016, 11:33 | #5 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
теперь нужно еще в
Private Sub Workbook_BeforeClose аккуратненько погасить след. выполнение UpdateTime Application.OnTime varNextCall, "UpdateTime", Schedule:=false и организовать, чтобы varNextCall знали все задействованные процедуры во всех модулях
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
29.08.2016, 11:50 | #6 |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Не получается самому... Можно получить код?
Jungo must die!!! (C) Bill Gates.
|
29.08.2016, 11:58 | #7 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
при наличии файла - можно
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
29.08.2016, 12:18 | #8 |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Не дает приципить файл... зипил, не зипил... не дает.
Есть еще варианты?
Jungo must die!!! (C) Bill Gates.
|
29.08.2016, 13:13 | #9 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
что значит - не даёт? кто не даёт? через "Расширенный режим" - "Управление вложениями"?
И что пишет? А какой размер у файла?! Может быть, для демонстрации/теста, стоит почистить книгу - удалить "тяжёлые" страницы или данные! Может быть, у Вас там миллион страниц и на каждой по тысяче картинок! а ещё, в самом тяжёлом и крайнем случае, можно выложить файл на любое файловое хранилище и дать сюда линк на скачивание. |
29.08.2016, 13:23 | #10 |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Я думаю из за окончания хайла: *.xlsm
Что подскажите?
Jungo must die!!! (C) Bill Gates.
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Workbook_Open и связи в ексель | Jaroslav | Microsoft Office Excel | 4 | 29.04.2014 14:26 |
private c++ | Arrioh | Помощь студентам | 2 | 30.11.2012 22:11 |
Перенос макроса в новую книгу в Workbook_open() | Daren | Microsoft Office Excel | 4 | 05.04.2011 13:27 |
Не работает Workbook_Open | kipish_lp | Microsoft Office Excel | 6 | 24.11.2010 14:00 |
Private Sub TextBox2_GotFocus() | bank_notes | Microsoft Office Excel | 7 | 12.08.2010 19:59 |