Страницы: 1
RSS
Макрос замена нулевых значений на среднее
 
Добрый вечер. Есть столбец со значениям, в некоторых ячейках они нулевые, нужен макрос который заменит 0 на среднее значение столбца без учета этих нулей. Т.е если идет (0,1,2,3) вместо 0 должна ставиться 2.
Изменено: Nazar93 - 18.02.2019 20:15:16
 
Выделяете столбце с числами, запускаете макрос
Код
Sub Macro1()

n = Application.Sum(Selection) / Application.CountIf(Selection, "<>0")
Selection.Replace 0, n, xlWhole

End Sub
Изменено: Sceptic - 18.02.2019 20:35:43
 
Здравствуйте.
Без макросов можно так: Выделить диапазон--Ctrl+F--Найти все--В найденном Ctrl+A--Закрыть окно Найти--Delete. В результате мы очистили ячейки с нулевыми значениями. Выделяем диапазон значений, в строке состояния Excel видим среднее значение выделенного диапазона или в любой ячейке пишем формулу =СРЗНАЧ(Диапазон), выясняем среднее запоминаем/записываем/копируем это значение--при выделенном диапазоне нажимаем F5--Выделить--Пустые ячейки--пишем среднее значение--Ctrl+Enter.
Вот такая вот инструкция, без формул и макроса можно заменить одно значение на другое. Конечно есть вариант проще, например кто нибудь напишет нужный макрос. Нужно только подождать. Проще этого, я не знаю.
 
Спасибо всем за помощь)
Страницы: 1
Наверх