SETI Statistics Spreadsheet

Just started to use SETI Statistics Spreadsheet, and when I run it always shows:

’ return a SETI string time
Public Function SETITime(lMins As Long) As String

Dim lHrs As Long

If (lMins > lYearLen) Then
SETITime = Format(CDbl(lMins) / lYearLen, “0.00”) & " years"
ElseIf (lMins Mod 60) = 0 Then
SETITime = Format(lMins \ 60, “0”) & " hr"
Else
SETITime = Format(lMins \ 60, “0”) & " hr " & Format(lMins Mod 60, “0”) & " min"
End If

End Function

The bold bit’s the error anyone know what’s wrong :confused:

Run Alt-F11 from Excel…This will open VB Editor…NExt Under Debug…Compile.

The code looks ok from what I see I think your have errors somewhere else.

Regards,

Greg

thanks m8 :thumbsup: