Страницы: 1
RSS
Работа макроса AUTO_OPEN
 
Добрый день, форумчане!  
 
Ранее я воспользовался макросом автоматического обновления страницы.  
Он используется для расчета функции ТДАТА()+ указывается интервал автоматического открытия файла.  
Проблема в том, что после закрывания файла пользолвателем он АВТОМАТИЧЕСКИ открывается, чем приводит пользователей в ужас (типа, я его закрыла, а он опять открылся)!    
Посмотреил на форуме информацию для обнаружения ошибки, но не нашел проблему. Поэтому ображаюсь к Вам с просьбой о помощи!  
 
Sub Auto_Open()  
Dim Per As Date  
Per = ThisWorkbook.Worksheets("ЛИСТ1").Range("Y2").Value  
Application.Calculate  
Application.OnTime Now + Per, "Auto_Open"  
End Sub
 

При закрытии книги надо отменять запланированный запуск макросов. <BR>Пример есть здесь: http://www.programmersforum.ru/showpost.php?p=300653&postcount=2 <BR>Делается это примерно так: <BR>Private Sub Workbook_BeforeClose(Cancel As Boolean) <BR>    Application.OnTime nextTime, "НазваниеМакроса", , False <BR>End Sub

 
Добрый день.  
 
Внес в модуль книги указанный в сообщении (а не в сноске)код.  
При закрытии книги выдает ошибку `1004` Method "on time" of object `_Application` failed.  
 
что -то неправильно в теле макроса?
 
надо запоминать время запуска.. делали?
Живи и дай жить..
Страницы: 1
Читают тему
Наверх
Loading...