При программировании макросов у вас может возникнуть необходимость определить, существует ли на диске конкретный файл. Например, целью вашего макроса может быть открытие и чтение текстового файла. Перед тем, как сделать это, вы захотите проверить, существует ли файл, чтобы избежать ошибки.

Следующую функцию можно использовать для проверки существования файла.

Все, что вам нужно сделать, это передать ему полное имя файла в виде строки, и макрос вернет либо 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), я подготовил специальную страницу, содержащую полезную информацию.

link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

WordTips — ваш источник экономичного обучения работе с Microsoft Word.

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (11831) применим к Microsoft Word 2007, 2010, 2013, 2016, 2019 и Word в Office 365. Вы можете найти версию этого совета для пользователей старый интерфейс меню Word здесь:

link: / word-Determining_if_a_File_Exists [Определение, существует ли файл].