Excel VBA - Функция округления

Я хочу создать макрос для редактирования прайс-листа, который генерирует мой ошибочный пакет ERP. В настоящее время я получаю 175,42 $ и т. д., и я хотел бы округлить их до 175,4 $ (в зависимости от второго десятичного знака).

  J           K
175,42      175,4 
193,76      193,8

dim i as integer
For i = 16 to 25
   Range("K" & i).Select = "=ROUND(J & i;1)"
Next i

Итак, я предполагаю, что это должно проходить через K16:K25 и использовать функцию округления, но, похоже, это дает ошибку, и я предполагаю, что это функция округления.