Автоматическое сохранение файла в текст без кавычек VBA

Question

Кто-нибудь может мне помочь, я сохраняю файл в текстовом формате, так как при открытии он, кажется, имеет кавычки в файле.

Как я могу его удалить. Он выглядит так: «16 347,21». Я в немецком формате. Должно быть 16 347,21.

Спасибо.

Dim path As String
Dim filename As String
path = Range("FolderPath").Text
filename = Range("FileName").Text
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs filename:=path & "\" & filename & ".txt", FileFormat:=xlText
ActiveWindow.Close
MsgBox "Data for Upload Saved"
Application.DisplayAlerts = True

Answer 1

xlTextPrinter , похоже, не включает кавычки на реальные числа. Попробуйте:

ActiveWorkbook.SaveAs filename:=path & "\" & filename & ".txt", FileFormat:=xlTextPrinter

введите описание изображения здесь