Код Excel VBA приводит к тому, что мои рабочие листы отображаются как жаргон

В настоящее время я использую макрос VBA, который я нашел здесь в стеке над потоком. Проблема в том, что когда я запускаю его, он сохраняет все данные в отдельный лист Excel, но когда я его открываю, он выглядит как "жаргон", другими словами, нечитаемый тип. Это "Сохранить код",

'Save the new workbook, and close it
wb.SaveAs ThisWorkbook.Path & "\test" & WorkbookCounter
wb.Close

Способ, которым я в настоящее время запускаю код, заключается в том, что он разделяет мои листы excel на разные листы распространения по строкам 250. Все работает, но когда я открываю сохраненные документы, он говорит, что этот формат файла неприемлем для Excel. Затем я пытаюсь импортировать его, и я получаю сообщение об ошибке. Вот небольшой снимок того, как он появляется на моем экране. Также здесь указано имя файла: built.list\test.xls39

1 ответ

Счетчик рабочей книги всегда заканчивается числом, Windows и Excel используют расширение файла для определения типа файла, поэтому файл.xls39 неузнаваем. Пытаться:

wb.SaveAs _
 Filename:=ThisWorkbook.Path & "\test" & WorkbookCounter & ".xls" _
 FileFormat:=XlFileFormat.xlExcel8

'Use xlOpenXMLWorkbook for the .xlsx format

(Используйте пробел, за которым следует знак подчеркивания для разделения строк в VBA)

Или убедитесь, что WorkbookCounter заканчивается на .xls а не на номере.

(Изменение: для других форматов, смотрите в диалоговом окне "Ссылки" в редакторе Excel VBA)

licensed under cc by-sa 3.0 with attribution.