View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 6,953
Default For Tom Ogilve re File check

Your welcome. Glad it worked out.
--
Regards,
Tom Ogilvy


"Matilda" wrote:

Hi Tom,

Thankyou for your reply to my post
Checking if active file is correct version

I tried to reply but my browser won't co-operate, and I certainly didn't
wish to appear ungrateful!

Such a simple solution that has been eluding me for hours - at least the
syntax has.

This now works exactly as i wanted:


Public Function checkActiveFilename(sOpenFileName) As Boolean
Dim sNewFile As String
sNewFile = "C:\NewFolder\NewFile\"
If ActiveWorkbook.Path = sNewFile Then
checkActiveFilename = False
End If
End Function

Many thanks,

Matilda