Пример: я хочу напечатать число в ячейке, вычесть его из дроби и отобразить результат в одной ячейке.
1 ответ
2
Я совершенно уверен, что это невозможно без VBA.
Я обычно использую этот код VBA для таких задач:
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo ErrHnd
Dim cell As Range
'This is the place where you put cells which are affected (A2 in this case)
If Not Intersect(Target, Me.Range("A2")) Is Nothing Then
Application.EnableEvents = False
For Each cell In Target
cell.Value = cell.Value - 0.5
Next
End If
ErrHnd:
Application.EnableEvents = True
End Sub
Есть место для определения ячеек, которые будут затронуты этим кодом. Просто поменяйте часть "A2"
. Вы можете поставить там диапазоны и разделить их запятыми, то есть "A2:A3,A5"
.
Часть cell.Value = cell.Value - 0.5
- фактическое вычитание дроби. В настоящее время он вычитает 0,5, но вы также можете изменить его.
Вы должны скопировать его в модуль Sheet в VBA Editor. VBA Editor открывается после комбинации клавиш Alt + F11.