Здравствуйте! Прошу перевести формулу английской версии: =INDEX(C2:C19,MIN(IF(SUBTOTAL(3,OFFSET(C2,ROW(C2:C19)-ROW(C2),0)),ROW(C2:C19)-ROW(C2)+1))) на русский вариант. Спасибо! Разобрался... Всё работает! {=ИНДЕКС(N2:N6;МИН(ЕСЛИ(ПРОМЕЖУТОЧНЫЕ.ИТОГИ(3;СМЕЩ(N2;СТРОКА(N2:N6)-СТРОКА(N2);0));СТРОКА(N2:N6)-СТРОКА(N2)+1)))}
- все запятые между аргументами заменяете на точку с запятой - INDEX = ИНДЕКС - MIN = МИН - IF = ЕСЛИ - SUBTOTAL = ПРОМЕЖУТОЧНЫЕ.ИТОГИ - OFFSET = СМЕЩ - ROW = СТРОКА
Sub Translate()
Const F$ = "=INDEX(C2:C19,MIN(IF(SUBTOTAL(3,OFFSET(C2,ROW(C2:C19)-ROW(C2),0)),ROW(C2:C19)-ROW(C2)+1)))"
Dim rg
Set rg = Cells.SpecialCells(xlCellTypeBlanks).Cells(1)
rg.Formula = F: Debug.Print rg.FormulaLocal: rg.ClearContents
End Sub
в окне Immediate можете посмотреть результат и скопировать его оттуда. Вообще можете считать это макросом для перевода формул