+ Ответить в теме
Показано с 1 по 3 из 3

Тема: Датирование редактирования в MS Excel

  1. #1
    system architect Anonymous is on a distinguished road
    Регистрация
    13.02.2004
    Сообщений
    697
    Вес репутации
    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 ....Может есть событие, к примеру, которое вызывается только во время редактирования?

    СпасибО!

  2. По умолчанию

     
    Хотите избавиться от рекламы? Зарегистрируйтесь
  3. #2
    developer chur is on a distinguished road
    Регистрация
    17.02.2004
    Адрес
    Riga, Latvia
    Возраст
    23
    Сообщений
    206
    Вес репутации
    21

    По умолчанию

    Попробуй так: Sh.Cells(Target.Row, 10).Value = Date

  4. #3
    system architect Anonymous is on a distinguished road
    Регистрация
    13.02.2004
    Сообщений
    697
    Вес репутации
    0

    По умолчанию

    Отлично, работает как хотел. СпасибО!

+ Ответить в теме

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения