Ошибка Run-time Error при изменении знака отделения дробной части

[kipish_lp]

Здравствуйте! Помогите, пожалуйста.

sh1.Cells(r, k) = "=" & y & "-R[1]C"

Когда запускаю макрос и в настройках системы у меня дробная часть отделяется ".", то все срабатывает нормально, а когда ",", то выходит ошибка "Run-time Error "1004" Application-defined or object-defined error"

[EducatedFool]

А что у вас находится в переменной y?
Именно из-за содержимого этой переменной и возникает ошибка.

[Hugo121]

Sub tt()

'где-нибудь в начале кода
sep_ = Mid$(1 / 2, 2, 1)

'затем перед использованием y в формуле:
y = Replace(y, ".", sep_)
sh1.Cells(r, k) = "=" & y & "-R[1]C"

End Sub

[kipish_lp]

Там хранится сумма чисел с дробной частью, например: 15,28
Когда была точка, ошибки не было.

[kipish_lp]

Спасибо большое!