Userform giver fejl når der kaldes til function?

Hej

Jeg prøver at gøre det kort, hvis der mangler oplysninger - sig til:

Fra min form deklareres:
Dim h1, h2, h3, h4, h5 As Integer
  Dim OpretStatus As Boolean

Jeg kalder en function på eksternt modul ved:

OpretStatus = OpretMaalingerMain(h1, h2, h3, h4, h5)

Funktionen er:

Function OpretMaalingerMain(m1 As Integer, m2 As Integer, m3 As Integer, m4 As Integer, m5 As Integer) As Boolean
  MsgBox ("Vi opretter")
  OpretMålingerMain = True
End Function

Jeg får fejlen "ByRef argument type mismatch"
Det må betyde at jeg sender en forkert "type" ind, men ovenstående viser jo jeg kører med integer?

Hjælp :-)