Макрос для множественного усреднения значений из колонки

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос для множественного усреднения значений из колонки (Макросы/Sub)

EvgenyAgeev9665

Дата: Суббота, 29.01.2022, 19:39 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Всем привет!
Помогите, пожалуйста, с макросом, который бы синхронно пробегался по нескольким столбцам таблицы (где один столбец будет выступать условием для усреднения), и усреднял диапазон с удалением лишних срок.
Во вложении пример исходных данных в формате LAS (можно открыть блокнотом), содержимое которого копируется в эксель, и далее усреднение происходит в ручном режиме. Второй пример во вложении - это то, как должно быть.
Критерием для усреднения является столбец LITO. В нем повторяющиеся значения 1,2,4,5,-999.25.
Значение в столбцах Poro, Perm, Kng - это то, что должно быть усреднено.
Задача макроса:
LITO Poro Perm
-999.25 0 0
-999.25 0 0
4 0 0
4 0 0
1 0.3 1.1
1 0.2 0.8
1 0.4 1.2
4 0 0
4 0 0
-999.25 0 0
-999.25 0 0
Идти по столбцу LITO, определить, что первое значение начинается с -999.25, дойти до первого значения, отличного от -999.25, и, оставив первое значение -999.25 усреднить столбцы Poro и Perm, удалив все нижние строки, которые соответствуют критерию -999.25.
Аналогично для остальных критериев из столбца LITO.
Должно получиться так:
LITO Poro Perm
-999.25 0 0
4 0 0
1 0.3 1.03
4 0 0
-999.25 0 0

К сообщению приложен файл: _U0604.xlsx (18.7 Kb) · U0604_1.las (87.5 Kb)

Ответить

Страница 1 из 1
1