Добрый день!
Создаю программно файл Excel, заполняю данными, закрываю.
Dim xlApp, xlWb, xlWs As Object
xlApp = CreateObject("Excel.Application")
xlWb = xlApp.Workbooks.Add
xlWs = xlWb.Worksheets(1)
.
.{Запись данных}
.
xlWs.SaveAs("A.xls")
xlWb.Close()
xlApp = Nothing

Когда я его открываю Excel'ем пишет:
Действительный формат открываемого файла отличается от указываемого в его раширении формата файла.
Как создать файл xls, чтобы он открывался без предупреждения?
Application.Version?
Спасибо.

xlApp.Version =12
а нужно xlApp.Version=11
как сделать?

Konst_One,

при добавление версии: Excel.Application.11 пишет "Не могу созадть ActiveX компонент",
при Excel.Application.12 - все отлично.
Привязка идет по офису.Почему я не могу создать файл 11-й версии?

Использую MS VS2008 (VB) и MS Office2007.

Konst_One,

да спасибо, помогло

FileFormat
http://msdn.microsoft.com/en-us/library/bb241279.aspx