在对宏进行编程时,可能需要确定磁盘上是否存在特定文件。例如,宏的目的可能是打开文本文件并从中读取。这样做之前,您将需要检查文件是否存在,以避免出错。

以下功能可用于检查文件是否存在。

您需要做的就是将完整的文件名作为字符串传递给它,宏将返回True(如果文件存在)或False(如果文件不存在)。

Function FileThere(FileName As String) As Boolean     FileThere = (Dir(FileName) > "")

End Function

您可以使用类似于以下功能:

If FileThere("c:\myfile.txt") Then     '     ' Do stuff here     ' Else     MsgBox "File Not There!"

End If

注意:

如果您想知道如何使用此页面(或_WordTips_网站上的任何其他页面)上描述的宏,我准备了一个包含有用信息的特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(819)适用于Microsoft Word 97、2000、2002和2003。您可以为Word(Word 2007)的功能区界面找到此技巧的版本。和更高版本)在这里: