Excel 2003 SP3, Windows XP 5.1 SP3

The following call is generating the subject error, highlighting intRow.
Can anyone explain it to me?

....Calling procedure
strTag = Trim(ActiveControl.Tag)
intRow = Int(strTag)
ActiveSheet.Shapes("R" & strTag) = _
Round(GetMeansResult(intRow, Val(ActiveSheet.Shapes("txt" &
strTag)), 0))

....GetMeansResult function

Function GetMeansResult(Index As Integer, X As Single)

Thank you.

Sprinks