Тема: Датирование редактирования в MS Excel
-
system architect
- Вес репутации
- 0
Датирование редактирования в MS Excel
Народ, помогите плз.
Есть таблица, необходимо, чтобы после редактирования любого поля автоматически выставлялась дата редактирования в специальной колонке(столбце) этой же записи (строки).
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
ByVal Target As Excel.Range)
Sh.Cells(ActiveCell.Row, 10).Value = Date
End Sub
Вот код, все работает, но проблема в том, что координаты текущей ячейки, в момент вызова события уже новые. Те нужно либо предыдущие координаты выбранной ячейки брать, либо вообще другое событие обрабатывать....
Вопрос 1....как определить кооординаты ячейки, которая была в фокусе перед текущей.
Вопрос 2 ....Может есть событие, к примеру, которое вызывается только во время редактирования?
СпасибО!
-
Реклама на форуме:
-
developer
- Вес репутации
- 21
Попробуй так: Sh.Cells(Target.Row, 10).Value = Date
-
system architect
- Вес репутации
- 0
Отлично, работает как хотел. СпасибО!