Чайник уже вскипел!!!
Не закрывается Excel (в смысле - "висит" в памяти) после записи в лист из VB и последующего сохранения/закрытия. Причём, даже если ничего не открывю (книгу Excel), просто команда
Range(nomerS).Value = "......" (запись в ячейку) - и Excel - в памяти. Команды
xl.Quit
Set xl = Nothing
ничего не дают. А вот закрытие программы убирает из памяти и Excel....

Чего-то я здесь серьёзно не понимаю и потому прошу помощи

Ну, хоть кто-нибудь! Отзовитесь!!!
Весь форум проглядел, все примеры опробовал - ВИСИТ, сволочь! (это я про Excel). Чем я его держу-то, если после откл.программы он (Excel) память освобождает???
Люди! Аууу!!!

Пробовал и DoEvents - увы.........

Чайник - он и в Африке.... Так что помогайте, люди добрые. Есть здесь гуру и прочие мастера?

ДопИнфо:
Программа периодически пишется на 2-х машинах (дома и на работе), соотв., Win'98SE/Off'97 и Win2000/Off'2000. С абсолютно идентичными результатами.....

Жду совета как Винни-Пух мёда

Вот кусочек кода, который предполагалось оставить как окончательный вариант. Всё работает, данные записываются куда нужно, только после завершения работы (не важно, с открытием Excel, или без, но с сохранением) - Excel "висит" в памяти, и при повторном обращении к этому кусочку программы всё выполняется без ошибок, но в таблице - пусто!

Dim xl As New excel.Application 'ссылка на библиотеку типов Excel
Dim xlb As New excel.Workbook
Dim xls As New excel.Worksheet

Set xlb = xl.Workbooks.Open(nameF)
Set xls = xlb.Worksheets.Item("Таблица")

'Заполнение ТАБЛИЦЫ
For i = 1 To kolGrupp
nomerS = "A" & Mid$(Str(kolStrok), 2, Len(Str(kolStrok)) - 1)
Range(nomerS).Value = "Группа " & Str(i)
For j = 1 To kolEP(i, 0)
kolStrok = kolStrok + 1
nomerSs = Mid$(Str(kolStrok), 2, Len(Str(kolStrok)) - 1)
nomerS = "A" & nomerSs
Range(nomerS).Value = namEP(i, j)
'и т.д. заполняется таблица по колонкам
Next
'и т.д. заполняется таблица по строкам с аналогичным кодом
Next

'Здесь - разрешение открыть Excel
'xl.Visible = True ' делаем Excel видимым
'Если Excel не открывается - запись
xlb.Save
'или
'xl.ActiveWorkbook.Save
'что вроде как одно и то же, по крайней мере записывается одинаково
'Завершение
xl.Quit
Set xl = Nothing
DoEvents

Вот, собственно, и всё.... Но даже если оставить вот так:
' ЗАРЕМИРОВАНЫ(!) все(!!!) ссылки и открывания книги и листов Excel
' только ОДНА командочка
Range(nomerS).Value = "информашка"
и далее - всё закрываем (мне так кажется)
xl.Quit
Set xl = Nothing
DoEvents
- Excel всё равно появляется в мозгах и висит там до закрытия VB-программы

"Нужно уничтожить ссылки..." ????!!!! - ведь написано жеж ж - Чайник.
Где? Что? Когда? ГосподА! Направьте на путь истинный

Как я наивно полагаю, Range - энто такая штука, кот. расставляет инфу в ячейки. Откуда эта Range родом - без понятия, в VB такой команды нет, может, VBA??? И вроде из-за неё и заморочки. Кусок кода взял из какого-то примера, сам не парю. Может, как-то по другому можно записывать инфу в ячейки?

Ну, и где ж "сермяжня правда"? Как-то же его можно "погасить"?? Ну ведь кто-то же ж умеет, а???
Слышал даже мимоходом, что нужно Application.TemplatesPath применить каким-то боком... Вот тока знать бы

В том-то и прикольчик, что НЕТ никаких "CreateObject". А все
Dim xl As New excel.Application
Dim xlb As New excel.Workbook
Dim xls As New excel.Worksheet
ЗАРЕМИРОВАНЫ - в примере кода - второй вариант. Соотв, нет и команд закрытия xl, xlb (заремированы).
И есть только одна строка с командой Range. И всё - появляется в мозгах Excel и висит до закрытия программы. Как убить эту штуку я как раз и не знаю.
Хотя это же очень просто. Но для тех, кто знает. Поделились бы кусочком информации, а?

(Продолж)
А вот если этой Range нет - то и Excel не появляется.....

Всем СПАСИБО!
Хотя вопрос остался....
Всё, как указано выше, было опробовано в разных вариантах.
Вот один из них:

Dim xl As New Excel.Application
Dim xlb As New Excel.Workbook
Dim xls As New Excel.Worksheet
' ========================

Private Sub ....
Set xlb = xl.Workbooks.Open(nameF)
Set xls = xlb.Worksheets.Item("Таблица")

'Заполнение ТАБЛИЦЫ
For i = 1 To kol1
For j = 1 To kol2
Range(nomerS).Value = <инфо>
'и т.д. заполняется таблица по колонкам
Next
'и т.д. заполняется таблица по строкам с аналогичным кодом
Next

xlb.Save
xlb.Close
xl.Quit
Set xlb = Nothing
Set xls = Nothing
Set xl = Nothing
End Sub

Если принудительно обойти или запретить или заремировать цикл, т.е. не выполняется команда Range (и не заполняется таблица), то Excel благополучно выключается. Если эта команда появляется - Excel повисает в памяти до выключения программы VB. Может, каким-то другим образом можно рассовывать инфу по ячейкам? Научите, мастера! Или может всё же кто подскажет, "чего ещё нажать"? Про 3 кнопочки я уже знаю...

>Alexander_Z - чего означает
А Dim Xl As New... тыры-пыры
и Create (тыры-пыры)
- я не понял. И что это за Create ?

AlexJuice - сделал всё в точности, как рекомендовано

Dim xl As Excel.Application
' ========================

Private Sub ....
Set xl = New Excel.Application
xl.Workbooks.Open (nameF)
xl.Worksheets.Select ("Таблица")

'Заполнение ТАБЛИЦЫ
For i = 1 To kol1
For j = 1 To kol2
Range(nomerS).Value = <инфо>
'и т.д. заполняется таблица по колонкам
Next
'и т.д. заполняется таблица по строкам с аналогичным кодом
Next

xl.ActiveWorkbook.Save
xl.Quit
Set xl = Nothing
End Sub

И всё с тем же результатом, как описано выше. Всё из-за этой вонючей Range!
Нет ни одной строчки
Set EXL = CreateObject("Excel.Application") ' запускаем Excel
и никаких упоминаний о CreateObject
(проверено поиском по всему проекту).
И слово <Excel> упоминается только 2 раза - в сточке dim... И set...

ПРИЧЁМ! - всё это выше приведённое, перенесённое в новый проект (вот только что осенило проверить), где "больше нет никто", а только вот это самое, даёт аналогичный результат... Чего бы это означало??? Я то думал, что где-то что-то серьёзно делаю не так, а оказывается, всё, как рекомендовано. Чего ещё нажать-то?
Люди! Помоги-и-и-ите!!!