Hi All,

I'm receiving the error 424:Object required when I try to pass a range
object to a method that I've defined for my own class object.

Class Module: Spread

Public Sub Calculate(ByRef TheStrip as Range)

' Done nothing

End Sub

Program Module: Main

Public Function Spreads(ByRef TheStrip as Range)

Dim oSpread as Spread
Set oSpread = New Spread
oSpread.Calculate(TheStrip) 'error occurs here!

End Function

Would appreciate any help.

Regards,
Paul.