if you create a function such as

Function fLastModified(ByVal strFileName As String) As Variant

Dim v As Variant
On Error GoTo AnError
v = FileDateTime(strFileName)

fLastModified = v
GoTo TheEnd
AnError:
fLastModified = Err.Description
TheEnd:
End Function


then you can refernce it either direct from the worksheet or in code

--
tony
-----------------------------------------------------------------------
tony h's Profile: http://www.excelforum.com/member.php...fo&userid=2107
View this thread: http://www.excelforum.com/showthread.php?threadid=50251