Всё получилось на ура.... стал разбираться дальше и столкнулся с другой проблемой(((( с защитой листа((( При защите ячеек на которые был написан макрос, и при изменении выполненной работы "за день" выпадает ошибка( при разблокированной ячейке такой ошибки нет..... возможно какое-либо решение данной проблемы?
Всё получилось на ура.... стал разбираться дальше и столкнулся с другой проблемой(((( с защитой листа((( При защите ячеек на которые был написан макрос, и при изменении выполненной работы "за день" выпадает ошибка( при разблокированной ячейке такой ошибки нет..... возможно какое-либо решение данной проблемы?NikolassMC
Public Sub WorkSheet_Change(ByVal Target As Range) If Application.Intersect(Target, Range("A1")) Is Nothing Then Exit Sub Range("B1").Value = Range("B1").Value + Range("A1").Value End Sub
[/vba]
Здравствуйте, подскажите что надо изменить в этом коде, что бы распространить его на весь столбик A
Public Sub WorkSheet_Change(ByVal Target As Range) If Application.Intersect(Target, Range("A1")) Is Nothing Then Exit Sub Range("B1").Value = Range("B1").Value + Range("A1").Value End Sub
[/vba]
Здравствуйте, подскажите что надо изменить в этом коде, что бы распространить его на весь столбик Aserega26
Сообщение отредактировал Serge_007 - Понедельник, 13.09.2021, 09:54
Public Sub WorkSheet_Change(ByVal Target As Range) If Application.Intersect(Target, Columns(1)) Is Nothing Then Exit Sub Target.Offset(, 1).Value = Target.Offset(, 1).Value + Target.Value End Sub
[/vba]
Здравствуйте, [vba]
Код
Public Sub WorkSheet_Change(ByVal Target As Range) If Application.Intersect(Target, Columns(1)) Is Nothing Then Exit Sub Target.Offset(, 1).Value = Target.Offset(, 1).Value + Target.Value End Sub
Спасибо, помогли! подскажите пожалуйста еще, как бать с тем, когда неправильно ввел значение, как вернуть назад к исходному значению ctrl+z не работает ))
Спасибо, помогли! подскажите пожалуйста еще, как бать с тем, когда неправильно ввел значение, как вернуть назад к исходному значению ctrl+z не работает ))serega26
Ни как, только если добавлять переменную в код, которая будет хранить предыдущее значение. но проще предыдущее значение сохранять где-то в доп.столбце, и потом его использовать при необходимости.
Ни как, только если добавлять переменную в код, которая будет хранить предыдущее значение. но проще предыдущее значение сохранять где-то в доп.столбце, и потом его использовать при необходимости.boa
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
