ник: FORMAT
Function RepPar1() As Integer
RepPar1 = Forms![frmCalc].gr0
End Function
Для вставки параметров функция должна быть с входящими параметрами
Function RepPar1( par1,par2,par3)
реализация логики самой функции
End Function
В модуле формы идет вызов этой функции
Call RepPar1( параметр1,параметр2,параметр3)
В качестве параметр1 параметр2 параметр3
могут выступать me.Поле1, например, или переменные, содержащие необходимые параметры
Ваша же функция без входных параметров, поэтому передать ей параметры невозможно.