Программирование на Visual Basic for Applications
-
bbc50
-
- Начинающий

-
-
- Сообщения: 1
- Зарегистрирован: 05.10.2007 (Пт) 14:07
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
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 12