| ← Октябрь 2015 → | ||||||
|
1
|
||||||
|
6
|
7
|
|||||
|
16
|
17
|
18
|
||||
|
23
|
24
|
25
|
||||
|
26
|
27
|
29
|
30
|
31
|
||
За последние 60 дней 4 выпусков (1-2 раза в месяц)
Сайт листа:
http://www.tiflocomp.ru/
Открыт:
19-10-2011
Пре-модерация: Нет
Адрес для писем в лист: industry.comp.tiflocomp.programming-list@subscribe.ru
нет, мне надо именно 10 секунд. более того, нестабильность вызвана вот чем:
внешняя программа обрабатывает данный файл, счиитывает его, и вот, когда
попадает на комфликт чтение запись - макрос валится. вопрос: есть ли
функция, проверяющая доступен ли текущая книга на запись?
Здравствуйте, Петухов константин.
> задача после открытия книги и до закрытия сохранять документ
> каждые 10 секунд
Прежде всего напомню, что в настройках Excel есть автосохранение. Правда
минимальный период там 1 минута и сохранение идёт во временный файл рядом с
основным. Однако возможно это всё же покрывает ваш сценарий.
> Application.OnTime Now() + TimeSerial(0, 0, 5), "myMacro"
Давно ничего не писал на VBA, но как-то резанула по глазам TimeSerial(0,
0,5).
Чисто визуально привычнее мне здесь TimeValue("00:00:10"), но я может просто
всё уже забыл.
> после закрытия книги, она
> автоматически открывается. понятно почему - продолжает выполняться
> рекурсивный макрос, непонятно как исправить.
Ну надо в конце полностью закрыть книгу
ThisWorkbook.Close false/true
false выход без сохранения, true - с сохранением. Кажется так.
> 2. ведет себя не стабильно,
> переодически предлагает перезаписать книгу и макрос валится, пока не
> перезапустишь. что с этой ерундой делать - не знаю.
Мне кажется, проблема в том, что период сохранения оказался слишком
коротким. Подозреваю, что иногда 10 секунд тупо не хватает, а вы уже даёте
команду на следующую итерацию сохранения. Попробуйте увеличить период
ожидания и посмотреть, будет ли это способствовать повышению стабильности
работы макроса.
Успехов. Никита.
Здравствуйте. задача после открытия книги и до закрытия сохранять документ
каждые 10 секунд мой код: модуль книги:
Public oldValue As Variant
Private Sub Workbook_Open()
oldValue = False
Call myMacro
End Sub
макрос myMacro
Sub myMacro()
Application.OnTime Now() + TimeSerial(0, 0, 5), "myMacro"
ActiveWorkbook.Save
End Sub
2 проблемы, которые не знаю как решить: 1. после закрытия книги, она
автоматически открывается. понятно почему - продолжает выполняться
рекурсивный макрос, непонятно как исправить. 2. ведет себя не стабильно,
переодически предлагает перезаписать книгу и макрос валится, пока не
перезапустишь. что с этой ерундой делать - не знаю.
Здравствуйте Shaxzod,
>Пожалуйста поделитесь книга для реальное >разработка приложение на языку C#
вот, что я нашел в google. Материал, правда, немного староват, но думаю, для
начала подойдет:
http://articles.org.ru/docum/CLattice.php
Это тоже ссылка из google, но более современный материал, но насколько
читабельно не знаю:
http://bookwebmaster.narod.ru/csharp.html
Если Вы владеете немецким, то могу дать ссылку на немецкую книгу, по которой
сам изучал/изучаю.
С уважением
Владимир
