Как запомнить предыдущее значение измененной ячейки Excel

Программирование на Visual Basic for Applications
bbc50
Начинающий
Начинающий
 
Сообщения: 1
Зарегистрирован: 05.10.2007 (Пт) 14:07

Как запомнить предыдущее значение измененной ячейки Excel

Сообщение bbc50 » 05.10.2007 (Пт) 14:51

Как запомнить предыдущее значение измененной ячейки Excel в VBA?
Вот если можно бы отловить событие "получение фокуса ячейки", тогда можно сохранить значение ячейки, а при событии "изменения" получить новое значение ячейки. Это чисто теоретически.
А как практически?

Template
Обычный пользователь
Обычный пользователь
 
Сообщения: 73
Зарегистрирован: 09.09.2006 (Сб) 18:03

Сообщение Template » 05.10.2007 (Пт) 18:42

Код: Выделить всё
Dim X As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count = 1 Then
       MsgBox "До : " & CStr(X) & " и после : " & CStr(Target.Value)
    End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Cells.Count = 1 Then
       X = Target.Value
    End If
End Sub


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 50

    TopList