Вывод сообщения при вводе цыфры в ячейку

[vasyater]

Ну жно проделать такую вешь или можноли сделать это - надо чтобы при вводе в ячейку цыфры - выходил диалог (вы уверенны ) чтобы в диалоге были кнопки да нет - нет значит не сохраняет значение , да - означает что сохранить эту цыфру которую ввел

[nilem]

Вроде это уже было. Вот, например, для Н4:Н9

PHP код:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("H4:H9")) Is Nothing Then
If MsgBox("Сохранить изменение " & Target.Value & "?", _
        vbInformation + vbYesNo, "Изменения в ячейках") = vbYes Then Exit Sub
    With Application
    .EnableEvents = False: .Undo: .EnableEvents = True
    End With
End If
End Sub 


[vasyater]

Огромное человеческое спасибо !!!!