макрос на разных машинах

[SAS888]

вопрос - почему?

Потому, что значение является строкой. При выполнении функции преобразования в числовое значение (Val), Excel преобразует текст в число до тех пор, пока не встретит символ, не являющийся числовым, т.е. не цифра и не разделитель целой и дробной части. Так, например, Val("123abcd456") вернет число 123 и т.п. Т.е. в Вашем случае происходит именно это (а не округление).

[Hugo121]

Что делает var()?
Как я понял, если в объяснении не напутано, если разделитель не системный - функция воспринимает выражение как текст и не обрабатывает. А если системный - как число и округляет.

Кстати, вот проверил - система чужой разделитель просто игнорирует

Sub tt()
x = 10.54
If IsNumeric(x) Then MsgBox x + 1
x = "10,54"
If IsNumeric(x) Then MsgBox x + 1
End Sub

[gsg]

Сообщение от SAS888

Потому, что значение является строкой. При выполнении функции преобразования в числовое значение (Val), Excel преобразует текст в число до тех пор, пока не встретит символ, не являющийся числовым, т.е. не цифра и не разделитель целой и дробной части. .

Если я не ошибаюсь, то объявляя массив
dim arr() as Double
я по умолчанию исключаю текстовые значения.

тем не менее, Val(arr(n)), где arr(n)=277,87 все равно выдает 277