powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проставление времени.
7 сообщений из 7, страница 1 из 1
Проставление времени.
    #33281628
Struchcov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Помогите пожалуста! Как сделать чтобы при вводе в ячейку А1 в ячейке B1 высвечивалось время его ввода.
...
Рейтинг: 0 / 0
Проставление времени.
    #33281686
LeonM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
b1 =if(A1="";"";now())
...
Рейтинг: 0 / 0
Проставление времени.
    #33281777
Фотография rrrrrrrrrr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Или в редакторе VB в коде листа вписать что-то вроде
Код: plaintext
1.
2.
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row =  1  And Target.Column =  1  Then Cells( 1 ,  2 ).Value = CStr(Date) + " " + CStr(Time)
End Sub
...
Рейтинг: 0 / 0
Проставление времени.
    #33281842
Struchcov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А если тоже самое только по столбцам?
...
Рейтинг: 0 / 0
Проставление времени.
    #33281889
Фотография k-nike
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К сожалению, по-моему оба варианта не годятся.
Так в 1-ом обновление ячейки произойдет при повторном открытии листа!!!
А во втором обновление будет происходить после любого изменения на листе!!!
...
Рейтинг: 0 / 0
Проставление времени.
    #33281902
Фотография k-nike
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Про 2-ой вариант я наверное погорячился!!! Сори.
...
Рейтинг: 0 / 0
Проставление времени.
    #33281916
Фотография 100g
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
k-nike
К сожалению, по-моему оба варианта не годятся.
Так в 1-ом обновление ячейки произойдет при повторном открытии листа!!!
А во втором обновление будет происходить после любого изменения на листе!!!
Да нет! Второй вариант работает на ура. Там же rrrrrrrrrr вписывает значение, а не формулу.
Я немного изменил для свои нужд, чтобы при редактировании ячейки из столбца А, в столбце B всегда записывается время последнего изменения соответствующей ячейкеи.
Код: plaintext
1.
2.
3.
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column =  1  Then Cells(Target.Row,  2 ).Value = CStr(Date) + " " + CStr(Time)
End Sub

2rrrrrrrrrr: Очень красивое решение.
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проставление времени.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]