Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Посетитель от 04 апреля 2019, 17:13

Название: Excel VBA: Почему файл существует, а макрос его не находит?
Отправлено: Посетитель от 04 апреля 2019, 17:13
Проверяю наличие конкретного файла в конкретной папке.
Файл находится в папке  "ИО".
Как прописать проверку вордовского файла "ги.docx"?
Файл реально существует, но макрос его не находит.

Макрос
Sub VerifyFile()

    Dim strPath As String, strFileName As String
   
    strPath = "G:\ИД\ИО\"
    strFileName = "ги.docx"
   
    If Dir(strPath & "\" & strFileName) <> "" Then
        MsgBox "Файл " & strFileName & " найден"
    Else
        MsgBox "Файл " & strFileName & " не найден"
    End If
   
End Sub
[свернуть]
Название: Re: Excel VBA: Почему файл существует, а макрос его не находит?
Отправлено: Администратор от 04 апреля 2019, 17:38
Не записывайте крайний правый слеш в переменную "strPath"
strPath = "G:\ИД\ИО"

Иначе в этой строке после "ИО" появляется два слеша подряд:
If Dir(strPath & "\" & strFileName) <> "" Then
Название: Re: Excel VBA: Почему файл существует, а макрос его не находит?
Отправлено: Посетитель от 04 апреля 2019, 18:45
удалил слзш, а изменений нет
Название: Re: Excel VBA: Почему файл существует, а макрос его не находит?
Отправлено: Администратор от 04 апреля 2019, 20:05
Заново скопируйте путь и имя файла и вставьте в макрос. Вручную не пишите, чтобы не сделать опечатку.
Название: Re: Excel VBA: Почему файл существует, а макрос его не находит?
Отправлено: Посетитель от 04 апреля 2019, 21:01
Большое спасибо, помогло.