Автоматический выбор минимального значения в данных

12.04.2009, 13:21. **Показов** 1297. **Ответов** 1

Author24 — интернет-сервис помощи студентам

проблема: есть некоторые данные по месяцам из них нужно выбрать минимальное значение, не равно 0. Попробовал использовать функцию МИНА, но видать сделал что-то неправильно и потому выводится сообщение об ошибке (#знач!)... мож кто знает как это делается?
заранее благодарен

@AntoshaXP · 13.04.2009, 13:18

На VBA (поиск минимума по колонке):

dim MinVal, CurrentVal as integer
dim i as integer

for i = 1 to RowsCount
CurrentVal = ActiveSheet.Cells(rOffset + i, cOffset).Value

if i = 1 then _
MinVal = CurrentVal

if CurrentVal < MinVal then _
MinVal = CurrentVal
Next

kenoby
		1
	Автоматический выбор минимального значения в данных 12.04.2009, 13:21. Показов 1297. Ответов 1 Метки нет (Все метки) проблема: есть некоторые данные по месяцам из них нужно выбрать минимальное значение, не равно 0. Попробовал использовать функцию МИНА, но видать сделал что-то неправильно и потому выводится сообщение об ошибке (#знач!)... мож кто знает как это делается? заранее благодарен

@AntoshaXP 2 / 2 / 0 Регистрация: 06.04.2009 Сообщений: 41
	13.04.2009, 13:18	2
	На VBA (поиск минимума по колонке): dim MinVal, CurrentVal as integer dim i as integer for i = 1 to RowsCount CurrentVal = ActiveSheet.Cells(rOffset + i, cOffset).Value if i = 1 then _ MinVal = CurrentVal if CurrentVal < MinVal then _ MinVal = CurrentVal Next 0