Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/фиксация текущего времени в момент ввода ячейки - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » фиксация текущего времени в момент ввода ячейки (Формулы/Formulas)
фиксация текущего времени в момент ввода ячейки
zaak88 Дата: Среда, 11.08.2021, 09:06 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 157
Репутация: 1 ±
Замечаний: 0% ±

Excel 2013
Друзья, доброе утро.

Помогите, пожалуйста, с задачкой: требуется при проставлении фамилии вносить текущее время и его фиксировать на момент ввода, при этом запретить замену ввода фамилии.
К сообщению приложен файл: 5475334.xlsx(9.8 Kb)
 
Ответить
СообщениеДрузья, доброе утро.

Помогите, пожалуйста, с задачкой: требуется при проставлении фамилии вносить текущее время и его фиксировать на момент ввода, при этом запретить замену ввода фамилии.

Автор - zaak88
Дата добавления - 11.08.2021 в 09:06
китин Дата: Среда, 11.08.2021, 09:57 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 6531
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
в модуль листа
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
Dim dat&
dat = Cells(Rows.Count, 1).End(xlUp).Row
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("B1:B" & dat)) Is Nothing Then
    
    If Target <> "" Then Target.Offset(0, 1) = Now
    End If
End Sub
[/vba]


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщениев модуль листа
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
Dim dat&
dat = Cells(Rows.Count, 1).End(xlUp).Row
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("B1:B" & dat)) Is Nothing Then
    
    If Target <> "" Then Target.Offset(0, 1) = Now
    End If
End Sub
[/vba]

Автор - китин
Дата добавления - 11.08.2021 в 09:57
zaak88 Дата: Среда, 11.08.2021, 10:08 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 157
Репутация: 1 ±
Замечаний: 0% ±

Excel 2013
Игорь, попробовал, не срабатывает, возможно не то сделал. Можете в файле направить.
 
Ответить
СообщениеИгорь, попробовал, не срабатывает, возможно не то сделал. Можете в файле направить.

Автор - zaak88
Дата добавления - 11.08.2021 в 10:08
китин Дата: Среда, 11.08.2021, 10:24 | Сообщение № 4
Группа: Модераторы
Ранг: Экселист
Сообщений: 6531
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
Алексей вводите данные в ячейки В3:В
К сообщению приложен файл: 5475334.xlsm(15.2 Kb)


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
СообщениеАлексей вводите данные в ячейки В3:В

Автор - китин
Дата добавления - 11.08.2021 в 10:24
китин Дата: Среда, 11.08.2021, 11:01 | Сообщение № 5
Группа: Модераторы
Ранг: Экселист
Сообщений: 6531
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
Алексей это как это у вас получилось? с репутацией?


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
СообщениеАлексей это как это у вас получилось? с репутацией?

Автор - китин
Дата добавления - 11.08.2021 в 11:01
zaak88 Дата: Среда, 11.08.2021, 12:17 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 157
Репутация: 1 ±
Замечаний: 0% ±

Excel 2013
Игорь, хотел повысить, а что получилось
 
Ответить
СообщениеИгорь, хотел повысить, а что получилось

Автор - zaak88
Дата добавления - 11.08.2021 в 12:17
китин Дата: Среда, 11.08.2021, 12:24 | Сообщение № 7
Группа: Модераторы
Ранг: Экселист
Сообщений: 6531
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
12 раз повысили. вот мне и интересно: КАК? 12 раз нажали или нажали один раз?


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщение12 раз повысили. вот мне и интересно: КАК? 12 раз нажали или нажали один раз?

Автор - китин
Дата добавления - 11.08.2021 в 12:24
Юрий_Ф Дата: Среда, 11.08.2021, 14:08 | Сообщение № 8
Группа: Проверенные
Ранг: Обитатель
Сообщений: 384
Репутация: -5 ±
Замечаний: 20% ±

Excel 2010
Прошу прощения за свою неосведомлённость.
А модуль листа, это где?


То, что мы делаем, завораживает!
Кстати! Я не могу всем нравиться! И это взаимно!
 
Ответить
СообщениеПрошу прощения за свою неосведомлённость.
А модуль листа, это где?

Автор - Юрий_Ф
Дата добавления - 11.08.2021 в 14:08
Nic70y Дата: Среда, 11.08.2021, 14:22 | Сообщение № 9
Группа: Друзья
Ранг: Экселист
Сообщений: 7017
Репутация: 1618 ±
Замечаний: 0% ±

Excel 2010
Правой кнопкой мыши по ярлыку листа,
исходный текст


ЮMoney(Яндекс Деньги) 41001841029809
 
Ответить
СообщениеПравой кнопкой мыши по ярлыку листа,
исходный текст

Автор - Nic70y
Дата добавления - 11.08.2021 в 14:22
Юрий_Ф Дата: Среда, 11.08.2021, 14:34 | Сообщение № 10
Группа: Проверенные
Ранг: Обитатель
Сообщений: 384
Репутация: -5 ±
Замечаний: 20% ±

Excel 2010
Nic70y

Мгм, спасибо!


То, что мы делаем, завораживает!
Кстати! Я не могу всем нравиться! И это взаимно!
 
Ответить
СообщениеNic70y

Мгм, спасибо!

Автор - Юрий_Ф
Дата добавления - 11.08.2021 в 14:34
Юрий_Ф Дата: Среда, 11.08.2021, 14:49 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 384
Репутация: -5 ±
Замечаний: 20% ±

Excel 2010
Nic70y,

Я посмотрел модуль. Виден диапазон столбца B (куда вносятся фамилии). А откуда таблица знает, куда вносить дату и время (столбец С)?
Чтобы значение даты и времени перенести в столбец А, что меняется в модуле? (Попытался перенести копированием в столбец А - дата и время перестают вставляться!)


То, что мы делаем, завораживает!
Кстати! Я не могу всем нравиться! И это взаимно!


Сообщение отредактировал Юрий_Ф - Среда, 11.08.2021, 14:53
 
Ответить
СообщениеNic70y,

Я посмотрел модуль. Виден диапазон столбца B (куда вносятся фамилии). А откуда таблица знает, куда вносить дату и время (столбец С)?
Чтобы значение даты и времени перенести в столбец А, что меняется в модуле? (Попытался перенести копированием в столбец А - дата и время перестают вставляться!)

Автор - Юрий_Ф
Дата добавления - 11.08.2021 в 14:49
китин Дата: Среда, 11.08.2021, 14:50 | Сообщение № 12
Группа: Модераторы
Ранг: Экселист
Сообщений: 6531
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
исходный текст

в более поздних версиях, чем 2010 офис написано Просмотреть код


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщение
исходный текст

в более поздних версиях, чем 2010 офис написано Просмотреть код

Автор - китин
Дата добавления - 11.08.2021 в 14:50
Юрий_Ф Дата: Среда, 11.08.2021, 14:55 | Сообщение № 13
Группа: Проверенные
Ранг: Обитатель
Сообщений: 384
Репутация: -5 ±
Замечаний: 20% ±

Excel 2010
китин,

У меня Исходный текст. Так что, нашёл и просмотрел!


То, что мы делаем, завораживает!
Кстати! Я не могу всем нравиться! И это взаимно!
 
Ответить
Сообщениекитин,

У меня Исходный текст. Так что, нашёл и просмотрел!

Автор - Юрий_Ф
Дата добавления - 11.08.2021 в 14:55
zaak88 Дата: Среда, 11.08.2021, 15:07 | Сообщение № 14
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 157
Репутация: 1 ±
Замечаний: 0% ±

Excel 2013
Игорь, нажал по паре раз, не срабатывало. Но пусть будет 12 раз, спасибо за помощь.
 
Ответить
СообщениеИгорь, нажал по паре раз, не срабатывало. Но пусть будет 12 раз, спасибо за помощь.

Автор - zaak88
Дата добавления - 11.08.2021 в 15:07
Мир MS Excel » Вопросы и решения » Вопросы по Excel » фиксация текущего времени в момент ввода ячейки (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования Jobsora jooble
© 2010-2021 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!