Jim Thomlinson wrote:
A couple of thing... Yes Offset is Volatile. Secondly post your UDF. It
probably/possibly has references to activesheet (possible by default) which
it should not have.

It's a function I found on the web, but I have modified it a little:

Function LastInRange(InputRange As Range)
Dim CellCount As Long
Dim i As Long

CellCount = InputRange.Count
For i = CellCount To 1 Step -1
If Not IsEmpty(InputRange(i)) And IsNumeric(InputRange(i)) Then
Set LastInRange = InputRange(i)
Exit Function
End If
Next i
LastInRange = ""
End Function

I don't see where an ActiveSheet reference would hide, but I'm newish
at VB/A.

....Stu