Обновление по таймеру

[kuklp]

Сообщение от Sergey112233

Пожалуйста, пару слов о замене:
ActiveWorkbook.Save
ActiveWorkbook.Close
лучше так:
ActiveWorkbook.Close(True)
Почему так будет лучше?

Кроме того, что так короче, Вы избавляете Эксель от ненужной проверки - сохранен ли файл.

[Sergey112233]

kuklp,
Спасибо за разъяснение.
Где бы об этом почитать?

[kuklp]

В справке по ВБА.

[Sergey112233]

kuklp, нашел
True Saves the changes to the workbook. If there is not yet a file name associated with the workbook, then FileName is used. If FileName is omitted, the user is asked to supply a file name.
False Does not save the changes to this file.

Спасибо

[IgorGO]

спасибо надо отправить Билу Гейтсу.
Мы бы общались здесь без него?

[Sergey112233]

Уважаемые форумчане.
Вынужден еще раз обратиться к раннее изложенному:

Public dTime As Date
Sub Кнопка4_Щелкнуть()
    Workbooks.Open Filename:="D:\1\Книга 13.xls"
    Application.Run "Книга 13.xls!Кнопка1_Щелкнуть"
    ActiveWorkbook.Close (True)

    Workbooks.Open Filename:="D:\1\Книга 14.xls"
    Application.Run "Книга 14.xls!Кнопка1_Щелкнуть"
    ActiveWorkbook.Close (True)

dTime = Now + TimeValue("00:01:00")
Application.OnTime dTime, "Кнопка4_Щелкнуть", "00:01:00"

End Sub

Суть вопроса в том, что в реальном проекте мои файлы в своих наименованиях содержат пробелы.
а метод Application.Run "Книга 13.xls!Кнопка1_Щелкнуть"
их не поддерживает.
VBA пишет, что не найден макрос.
Есть ли способ оставить в наименованиях файлов пробелы и не заменять их , например подчеркиванием?

[IgorGO]

пробуйте так
"'Книга 13.xls'!Кнопка1_Щелкнуть" будет Вам счастье и вообще надо пробовать, не сдаваться, у меня 0.7 заканчивается, но я не здаюсь....

[Sergey112233]

IgorGO, спасибо.
Смотрел Trim.
попробую Ваш вариант с апострофами

[Sergey112233]

Уважаемые форумчане.
Подскажите, пожалуйста, где доходчиво изложено про одинарные и двойные апострофы?

[IgorGO]

Сергей, несколько простых экспериментов - и Вы все сами разложите по полкам. база есть - детали прийдут