Автоматическая смена времени в ячейке

Пользователь

Сообщений: 194 Регистрация: 01.01.1970

11.09.2018 17:25:55

Всем привет! Excel 2003. Подскажите пожалуйста, возможна ли автоматическая смена времени в ячейке. Я имею ввиду без запуска макроса каждый раз, как только нужно установить текущее время.

Прикрепленные файлы

расп.xls (28 КБ)

ivanok_v2

Пользователь

Сообщений: 712 Регистрация: 19.08.2018

11.09.2018 17:32:58

измените формат на время и используйте

Код
=ТДАТА()

Сергей Зотов Пользователь Сообщений: 194 Регистрация: 01.01.1970	#3 11.09.2018 19:18:14 К сожалению не то. Нужно чтобы в запущеной таблице менялось время в ячейке синхронно системным часам без какого либо вмешательства.

_Igor_61

Пользователь

Сообщений: 3007 Регистрация: 18.07.2016

11.09.2018 19:41:22

Если правильно понял задачу, то можно так:

Код
Sub время() Application.OnTime Now + TimeValue("00:00:05"), "время" [b4].Value = CDate(Format(Now(), "h:mm:ss")) End Sub

Для наглядности добавил секунды - обновление каждые 5 сек. А чтобы избавиться от кнопки можно посадить макрос на событие открытия книги.

Сергей Зотов Пользователь Сообщений: 194 Регистрация: 01.01.1970	#5 12.09.2018 04:13:25 Вот это подходит. Спасибо. Вопрос решен.