Галактика в вопросах и ответах

частенько бухам хочется в Пат-форме дописать суммы, перетянуть цифры в другу таблу и т.д., но GetPatVar упорно дает строку. Можно играть заменой разделителей и пр., но я решил проблему так:
Function GetPATVar1(ByVal sPATId As String, ByVal sPATVariable As String) As Double
GetPATVar1 = GetPATVarCol(sPATId, sPATVariable, 5)
End Function 'GetPATVar

Просто переписал GetPatVar. Там сразу имеем число вне зависимости от настроек разделителей в Галек и Виндах.
Может кому поможет

Поможет, очень даже ...
Вот только непонятно, где ее переписать. Можно подробней ...

Открываешь excel файл. Жмешь Сервис-Макорс-Макросы -- Войти (в любой). Открется VBA там находишь GetPatVar, рядом дописываешь 1, закрываешь VBA, сохраняешь Excel. Усё