Здравствуйте! Даже не знаю, как забить свой вопрос в поиск. Нужно, при заполнении таблицы, новой строки, в ячейке с датой автоматом проставлялась сегодняшняя дата, но что бы далее она не менялась, т.е. на след. день в заполненных строках оставалась прошлая дата, а в новых при заполнении простовлялась сегодняшняя.
Здравствуйте! Даже не знаю, как забить свой вопрос в поиск. Нужно, при заполнении таблицы, новой строки, в ячейке с датой автоматом проставлялась сегодняшняя дата, но что бы далее она не менялась, т.е. на след. день в заполненных строках оставалась прошлая дата, а в новых при заполнении простовлялась сегодняшняя.yurkost
Можно так "Подставлять даты при изменении ячеек". Для более конкретного ответа нужен файл, чтобы знать какие ячейки строки будут изменятся, в какой столбец ставить дату, ставить ли дату при только при первом изменении любой ячейки или при каждом. Если очистить данные в ячкйках строки, должна ли удалиться дата?
Можно так "Подставлять даты при изменении ячеек". Для более конкретного ответа нужен файл, чтобы знать какие ячейки строки будут изменятся, в какой столбец ставить дату, ставить ли дату при только при первом изменении любой ячейки или при каждом. Если очистить данные в ячкйках строки, должна ли удалиться дата?gling
ЯД-41001506838083
Сообщение отредактировал gling - Суббота, 02.09.2017, 10:56
Подставлять даты нужно во 2 столбец ("дата приемки") листа "Ремонт" при заполнении ячейки в столбце ФИО (т.е. при приемке аппарата в ремонт, дату нужно проставить автоматом, и далее ее не нужно изменять, если только вручную...). Может хотя бы чтобы только число поставить, а месяц и год подтягивался автоматом текущие, но лучше полностью автоматически.
Подставлять даты нужно во 2 столбец ("дата приемки") листа "Ремонт" при заполнении ячейки в столбце ФИО (т.е. при приемке аппарата в ремонт, дату нужно проставить автоматом, и далее ее не нужно изменять, если только вручную...). Может хотя бы чтобы только число поставить, а месяц и год подтягивался автоматом текущие, но лучше полностью автоматически.
Подставлять даты нужно во 2 столбец ("дата приемки") листа "Ремонт" при заполнении ячейки в столбце ФИО
В модуль листа "Ремонт" [vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Columns(3)) Is Nothing Then Application.EnableEvents = False Target.Offset(, -1) = Date End If Application.EnableEvents = True End Sub
[/vba]
Цитата
Подставлять даты нужно во 2 столбец ("дата приемки") листа "Ремонт" при заполнении ячейки в столбце ФИО
В модуль листа "Ремонт" [vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Columns(3)) Is Nothing Then Application.EnableEvents = False Target.Offset(, -1) = Date End If Application.EnableEvents = True End Sub
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
