подскажите, плиз

[formentor]

мне надо формат поменять с xls на csv
и чтобы он не переспрашивал, что там всякие данные могут потеряться, продолжать ли типа и т.д.

ну вот это так пробовала
book.SaveAs FileFormat:=xlCSV
book.SaveAs (Replace(XLS.Name, ".xls", ".csv", , , vbTextCompare))

все неправильно
а как, не подскажете?

заранее спасибо

[Legachoff]

Попробуй так

ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\file.csv", FileFormat:= _
xlCSV, CreateBackup:=False

[formentor]

нет, к сожалению, это не работает
там много документов
мне нужно, чтобы они под теми же именами, но в другом формате

а здесь он при закрытиии .csv спрашивает, сохранить ли в нем изменения

но ввсе равно спасибо

[lord0n]

а кто тебе мешает вместо file.csv указать свое имя файла?

[formentor]

просто их в папке много, и каждый раз имя будет разное

а вот проблема у меня как раз с автоматическим сохранением .csv
он переспрашивает, сохранять ли его

book.SaveAs FileName:=Replace(XLS.Name, ".xls", "1.csv", , , vbTextCompare), FileFormat:=xlCSV, CreateBackup:=False


book.Close
вот на этапе close он и спрашивает(

ведь 100 документов не оставишь открытыми(
вот я думаю, может в самом excelе отключить эту фичу, чтоб не спрашивал, но это "нетехнологично"))

а чего делать??

[alibek]

Перед .Close напиши book.Saved = True.
Только надо по другому делать, я уже дважды на форум примеры выкладывал.

[formentor]

а где эти ваши примеры?
плиз
киньте в меня ссылкой

[sergeyvg]

Код: Выделить всё

Application.DisplayAlerts = False
book.SaveAs FileFormat:=xlCSV
Application.DisplayAlerts = True

[formentor]

спасиба, добрый пришелец(с)


но если стоит задача отладки, то, наверное, не очень хорошо запрещать все диалоговые окна, да?

[uhm]

Окна запрещаются только на время сохранения файла. Процесс сохранения ты, я надеюсь, отлаживать не будешь?

[formentor]

а, понятно
спасибо, дяденьки
вы мне помогли