Запись в Exel

Форум Программирование Общие вопросы программирования (Dev)

Конфигурации 1cv8 1С:ERP Управление предприятием 2

1. Greek26rusa 2 23.12.19 15:30 Сейчас в теме

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

Excel = Новый COMОбъект("Excel.Application");
 	Books =	Excel.WorkBooks.Open("C:\TEST\Desktop\Приходная накладная1.xlsx");
	ExcelЛист = Excel.Sheets(1);
	
	FullName = Excel.ActiveWorkbook.FullName;
	ExcelЛист.Cells(1,5).value = "Исполнено";
	Books.Save(FullName); 
	Books.Close();   
	Excel.Quit();

Показать

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

5. Greek26rusa 2 24.12.19 11:01 Сейчас в теме

Excel = Новый COMОбъект("Excel.Application");

Excel.DisplayAlerts = Ложь

Books = Excel.WorkBooks.Open("C:\TEST\Desktop\Приходная накладная1.xlsx");
ExcelЛист = Excel.Sheets(1);

FullName = Excel.ActiveWorkbook.FullName;
ExcelЛист.Cells(1,5).value = "Исполнено";
Books.Save(FullName);
Books.Close();
Excel.Quit();

Показать

Ответы выше помогли спасибо

2. soft_wind 23.12.19 15:38 Сейчас в теме

так Перезаписать и ДоЗаписать - это две большие разницы!!

3. herfis 506 23.12.19 15:41 Сейчас в теме

Попробуй

Excel.Visible = 0;
Excel.UserControl = 0;

ЗЫ. Еще DisplayAlerts гуглится

4. antz 23.12.19 15:45 Сейчас в теме

Excel.DisplayAlerts = Ложь

Оставьте свое сообщение

E-mail: