Function IsValidFileName(sFileName As String) As Boolean
Dim vaIllegal As Variant
Dim i As Long
vaIllegal = Array("/", "\", ":", "*", "?", "< ", ">", "|", """")
IsValidFileName = True
For i = LBound(vaIllegal) To UBound(vaIllegal)
If InStr(1, sFileName, vaIllegal(i))
Read More...
Read the complete post at http://www.dailydoseofexcel.com/archives/2010/04/20/illegal-file-names/
Posted
Apr 20 2010, 06:27 PM
by
Daily Dose of Excel