Подскажите корректно настроить макрос так чтобы он запускался когда в указанный диапазон ячеек (например, А1:A3) будет введено число, тогда в этот момент в соседней ячейке где забита формула (=A1*0,9) будет запущен макрос и формула изменится на результат
Этот не работает корректно!
Этот не работает корректно!
Код |
---|
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A1:A3")) Is Nothing Then If Target <> 0 Then MsgBox "Ок" Sub Formulas_To_Values_Sheet() 'преобразование формул в значения на текущем листе ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value End Sub End If End If End Sub |