Цитата | ||
---|---|---|
написал: )) замените Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < > 2 Then Exit Sub If Target.Count > 1 Then Exit Sub Target.Offset(0, - 1) = Val(Target.Offset(0, - 1)) + Val(Target) End Sub на
т.е. нужно удалить 3 символа |
Прибавление ячейки к общей сумме и обнуление ее каждый месяц
Прибавление ячейки к общей сумме и обнуление ее каждый месяц
Прибавление ячейки к общей сумме и обнуление ее каждый месяц
Прибавление ячейки к общей сумме и обнуление ее каждый месяц
Прибавление ячейки к общей сумме и обнуление ее каждый месяц