MrShinА эксель из какого офиса? Если 2007 и старше, то проще всего давать файлу корректное расширение xlsx сразу.
Если нужен все же xls, то сохранять нужно не в формате по умолчанию, а в формате 97-2003
MrShin, спасибо, поменял расширение на xlsx и ругаться перестало.
JossА почему Вам надо обязательно создавать файл, а не воспользоваться экспортом? Например
1.
2.
3.
4.
5.
6.
7.
8.
Select Case sngVersion
stDocName = "qSpr_Журнал"
Select Case sngVersion
Case Is < 12
DoCmd.OutputTo acOutputQuery, stDocName, "MicrosoftExcelBiff8(*.xls)", "Журнал застройщиков.xls", True
Case Else
DoCmd.OutputTo acOutputQuery, stDocName, "ExcelWorkbook(*.xlsx)", "Журнал застройщиков.xlsx", True
End Select
Этим методом до меня в базе пользовались... но он не форматирует ячейки..., хотя быстрый конечно... там есть большие комментарии, и пользователь, если не видит весь коммент, начинает нервничать и впадает в ступор, а анимация заполнения ячеек экселевской таблички по первому методу производит на них магическое действие)... ну... по крайней мере пока)
АнантолийМетоду xlBook.SaveAs можно указать конкретный тип файла.
Интересно, а какой тип файла у вас получается? На Excel 5.0 он бы так не ругался.
Анатолий, спасибо за инфу. Если сделать так:
1.
2.
filename = "H:\каталог\" & "имяфайла" & ".xls"
xlBook.SaveAs filename, FileFormat:=56
то сохраняется в XLS и не ругается при открытии.
