Формат файла и расширение файла filename.csv не совпадают

Question

Я сохранил файл в формате .csv, используя VBA.Ниже приведен код:

ActiveWorkbook.SaveAs "FilePath" & Format(Now() - 3, "mm.dd.yy") & ".csv"

Файл успешно сохранен.Однако при открытии файла выдается ошибка «Формат файла и расширение файла filename.csv не совпадают. Файл может быть поврежден или небезопасен».Я пытаюсь подавить это предупреждение.Было бы здорово, если бы кто-нибудь помог мне узнать, чего мне здесь не хватает.

Answer 1

Полагаю, вам не хватает форматирования файла.

ActiveWorkbook.SaveAs Filename:="FilePath" & Format(Now() - 3, "mm.dd.yy") & ".csv", _
  FileFormat:=xlCSV

Если этот формат файла не работает, вы можете посмотреть следующую ссылку, где вы можете найти больше версий для использования CSV :) https://msdn.microsoft.com/en-us/vba/excel-vba/articles/xlfileformat-enumeration-excel