Макрос замены для столбца в Exel

Задачка — в прайсе поставщиков нулевой вес продукта поменять на сто. Делаем макросом

Columns("G:G").Select

Selection.Replace _
What:="0", Replacement:="100"

End Sub

конец решения