Как работает Dir () в VBA

В моем текущем коде VBA я генерирую переменную с именем myFileName и хотел бы использовать ее в качестве параметра, когда проверяю, существует ли файл, но я получаю сообщение об ошибке «Ошибка выполнения 52, неправильное имя файла или номер» в используемой строке команда Dir.

Интересно, если я набираю путь к файлу Dir вручную вместо использования переменной myFileName, то он работает без проблем. (нет опечатки, я могу использовать myFileName при чтении или записи файла, это только приводит к ошибке для команды Dir)

Любые идеи, как я могу заставить Dir (myFileName) работать?

Set fs = CreateObject("Scripting.FileSystemObject") myFileName = Environ("USERPROFILE") & "\Application Data\myFile.txt" If Dir(myFileName) = "" Then Set a = fs.CreateTextFile(myFileName, True) a.Write ("0") a.Close End If 

\Application Data – это не папка, а ярлык. LOCALAPPDATA этого используйте LOCALAPPDATA или APPDATA :

 myFileName = Environ("LOCALAPPDATA") & "\myFile.txt" myFileName = Environ("APPDATA") & "\myFile.txt" 

ваша проблема:

 myFileName = Environ("USERPROFILE") & "\Application Data\myFile.txt" 

должен быть

 myFileName = Environ("USERPROFILE") & "\Application Data" & "\" & "myFile" & ".txt" 

Это общий вопрос и действительно стоит признать, что вам нужно вставить последнюю косую черту, как это. IDK, почему vba читается так, но это работа

Я просто запускал это без проблем и создавал файл.

 Private Sub createafile() Set fs = CreateObject("Scripting.FileSystemObject") myFileName = Environ("USERPROFILE") & "\Desktop" & "\" & Format(Date, "ddmmyyyy") & ".xlsm" If Dir(myFileName) = "" Then Set a = fs.CreateTextFile(myFileName, True) a.Write ("0") a.Close End If End Sub 
  • Удалить строки, найденные в файле со многими строками
  • Преобразование txt-файла в excel, а затем модификация excel и импорт нового файла excel в базу данных
  • читать файлы из папки unc в asp.net mvc
  • Преобразование Json в файл Xlsx
  • Чтение следующей строки файла
  • Apache POI - ошибка чтения файла excel
  • Python: использование CSV-файла Excel для чтения только определенных столбцов и строк
  • Заполнение полей формы Excel из базы данных MySQL
  • Android открыть файл и позволить пользователю выбрать, какая программа может его открыть
  • Excel для отображения файлов, значений в ячейке A1 и спускания
  • Эффективная библиотека Java для чтения файлов Excel?
  • Давайте будем гением компьютера.