Помогите написать программу в VBA

[Александр Шатило]

На склад поступило некоторое количество товара. Данные о наименовании товара и его цене занесены в таблицу. Один из товаров имеет самую низкую стоимость. Определить наименование этого товара. Нужно написать код на VBA.
Вот готовая таблица.

[Hugo121]

Sub Кнопка1_Щелчок()
    With Application
        [i11] = .Min([a1].CurrentRegion.Columns(2))
        [g11] = .Index([a1].CurrentRegion, .Match([i11], [a1].CurrentRegion.Columns(2), 0), 1)
    End With
End Sub

И вот пусть только кто-то скажет,что это не VBA

[Александр Шатило]

А можно проще написать?

[EducatedFool]

А куда уж проще-то?
Чтобы одна строка кода получилась??

[Александр Шатило]

Я имею ввиду на простом языке)
Мне так нужно