Удаление листа в закрытой книге

[RISagitov]

хочу автоматически вести поиск в указанном каталоге xls файлов, далее, не открывая их, но устанавливая с ними связь, проверять наличие листа systemsheet, в нем информация о том куда отправлять, тема письма, ...

далее считать эти данные в переменную, разорвать связь с внешней рабочей книгой, сжать ее, отправить по почте

и так весь указанный каталог

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

[Hugo121]

Глянул правда поверхностно:

                            'удаляем лист, который больше не нужен
                            GetObject(NextOneFile).Worksheets("SystemSheet").Delete
                            
                            
                            'закрываем активную рабочую книгу true - с сохранением
                            GetObject(NextOneFile).Close True

Тут нет "не открывая", и нет "удаляются все листы".
А вот то, что книга сохраняется с скрытым окном - это есть!
Его нужно сперва отобразить, потом сохранить.

[RISagitov]

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

Глянул правда поверхностно:

                            'удаляем лист, который больше не нужен
                            GetObject(NextOneFile).Worksheets("SystemSheet").Delete
                            
                            
                            'закрываем активную рабочую книгу true - с сохранением
                            GetObject(NextOneFile).Close True

Тут нет "не открывая", и нет "удаляются все листы".
А вот то, что книга сохраняется с скрытым окном - это есть!
Его нужно сперва отобразить, потом сохранить.

Удаляются, проверял,
вставлял значения в ячейки всех листов,
Значения исчезают

[Hugo121]

Т.е. как удаляются, если исчезают значения?
Когда удаляются листы, о значениях речь не идёт!
Т.е. нет ни одного листа? Это физически невозможно! (если так можно сказать о витруальном )
Отобразите в меню окно этой книги.

[RISagitov]

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

Т.е. как удаляются, если исчезают значения?
Когда удаляются листы, о значениях речь не идёт!
Т.е. нет ни одного листа? Это физически невозможно! (если так можно сказать о витруальном )
Отобразите в меню окно этой книги.

Отобразил, значения отсутствуют, пустых стандартных три листа (лист1, лист2, лист3) вместо листов work, лист2
Как было до того



То что вы пишите, не есть решение проблемы,
Полагаю вы и дальше будете цепляться к словам

[Hugo121]

А чтож не поцепляться
Вон же написано: "удаляются все листы вместо одного"
А в итоге: "пустых стандартных три листа (лист1, лист2, лист3)"
Вот про это я и писал.
То что там "вместо листов work, лист2" - это уже другой вопрос, Вы об этом не спрашивали.
Да и не вычитывал я Ваш код, я другой писал
Тем более, что код порезан и думаю вообще работать не будет в этом варианте (мне так показалось, не проверял).