Удалить лист в Excel

[apanko]

Цитата:

Сообщение от helga

Не удаётся удалить лист в Excel.
Применила команды:

xlWorkSheet := xlWorkBook.Worksheets.Item(LinesItemNo); // выбрала лист
xlWorkSheet.Range('1:' + FORMAT(RowsQty)).Delete; // Удалила содержимое
xlWorkSheet.Shapes.Item(1).Delete; // Удалила границы
xlWorkSheet.Delete; // пытаюсь удалить лист, к сожалению

Это потому что Эксель спрашивает у пользователя - "На данном листе могут существовать данные ...". Причем делает это независимо от того есть ли там данные или нет. Точнее если данных никогда не было, то не спрашивает. А если были, то несмотря на то, что их потом удалили - вопрос все равно будет.

Чтоб отключить вопросы нужно использовать свойство DisplayAlerts объекта Application

XlApp.DisplayAlerts(FALSE); //отключили вопросы.
XlWrkSht2.Delete; //удалили лист.
XLapp.DisplayAlerts(TRUE); //включили вопросы назад.

Кстати очищать лист перед тем как его удалить не нужно.