Подскажите как создать макрос на максимальное и минимальное значение ?
Есть данная таблица
Пытался сделать сам, но выходит не совсем то. Сможет кто подсказать ?
Sub Up()
Dim R As Long
R = InputBox("Задать номер строки")
With Worksheets("Лист1").Rows(R)
MsgBox "Max" & WorksheetFunction.Max(.Cells) & vbNewLine & _
"Min" & WorksheetFunction.Min(.Cells)
End With
End Sub
Результат такой. Как мне сравнить 2 и 3 столбец. Чтобы например в ячейке или всплывающем окне было написано минимальное значение 54,8 в в 1998 году.
