You want the Saved property of the document - it flips to false as soon as the document is updated.
E.g.
If ActiveDocument.Saved = False Then ActiveDocument.Save
There's no change in the file format between Excel 97 and Excel 2000, so this shouldn't be a problem.
There a a few enhancements in Excel 2000 that can't be handled by 97, but I doubt that these are used in workbooks created by access.
For more details see...
The following function will do the trick:
Public Function GetFileName(ByVal sIn As String) As String
Const cPat As String = "(?<=>)(.*?)(?=</A>)"
Try
dim rx As New System.Text.RegularExpressions.Regex(cPat)
Return (rx.Match(sIn).ToString)
Catch ex As Exception
Stop...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.