Корректное закрытие ОКНА Excel - Сообщение 918494 - VBA

voam · 09.11.2009, 16:47

Добрый день!

Подскажите, пожалуйста, каким образом можно решить следующую задачу.

Я написал скрипт (макрос), который выполняется в момент открытия книги, после чего книга тут же закрывается. Однако если вызывать метод ThisWorkbook.Close, то закрывается именно сама книга скрипта, но не окно Excel, в котором эта книга была открыта. Если же применять метод Application.Quit, то закрываются любые открытые на данный момент окна Excel. Мне же необходимо "уничтожить" только то окно, в котором выполнялся мой скрипт.

Подозреваю, что данная операция осуществляется при помощи API-функций. Но основная проблема, с которой я столкнулся в их применении - это получение дескриптора "моего" окна Excel. Порывшись в сети, наткнулся на функцию FindWindow, однако она в качестве параметра принимает переменную lpClassName, а как получить ее значение для моего приложения я не знаю ...

Может быть, есть иные способы реализовать закрытие окна?..

Буду очень признателен за помощь!

Похожие темы
Тема	Автор
VBA в таблице в нужном столбце найти строку по значению и удалить ее помогите в таблице в нужном столбце найти строку по значению и удалить ее	rovi221
VBA как из Access открыть файл, используя диалоговое окно "Открыть файл" В БД Access надо открыть файл Excel. Причем файл для открытия должен выбрать сам пользователь.	Elenko
VBA Перенос информации из ячеек Excel в Word Добрый день всем. Люди добрые помогите разобратся с таким заданием: <STRONG>Перенос текстовой и числовой информации из ячеек Excel в уже приготовленный документ Word по нажатию на кнопку(тип объекта Button)</STRONG> В инете искал подобные примеры но очень мало инфы нашел не помогло! Кто нить может помочь?!	Raven
вставка полей из таблицы access в документ word VBA надо написать две программы для вставки полей из таблиц в TextBox в документе word. Для одной кнопки написал, а для второй пишу тоже самое, но работать не хочет... выдает ошибку 3464... вот тексты обеих прог 1.работает Private Sub CommandButton1_Click() Dim bd1 As DAO.Database	Drimon
Как открыть существующую Workbook на заданном листе (Worksheet) с помощью макроса? VBA Как открыть существующую Workbook на заданном листе (Worksheet) с помощью макроса? Например: Application.Workbooks("Book1").Worksheets("Sheet3")	Skovorodin
VBA Необходимо сделать выборку из таблицы dbf необходимо сделать выборку из таблицы dbf поле index - string Dim n As String n = "157164" Set rs = .Execute("SELECT Index, OpsName,PrBegDate, PrEndDate, DelivType,DelivPNT, Baserate FROM DivLim WHERE index=n") при выполнении на этой строчке ошибка "Отсуствует значение для одного или нескольких требуемых параметров" если беру другое поле с типом числовое и ставлю WHERE lala=1, то выборка...	rovi221
Необходимо создать макрос для включения отображения текста отдельных колонок в виде маски VBA Имеется база данных заказов на размещение рекламы в формате MS Excel 2003. Необходимо создать макрос для включения отображения текста отдельных колонок в виде маски (как пароль) при открытии документа и отображения текста в нормальном виде после ввода пароля. Спасибо.	Xakand
VBA Адаптация кода для 64 битных систем (x64) всем, здравствуйте. помогите пожалуйста решить проблему. Есть книга с макросами, написанная для 32 битной платформы - там все работает ок. Сейчас у меня win7 x64 и Office 2010 x64 и возникла ошибка в коде: Private Declare Function GetUserNameDomain Lib "Secur32.Dll" Alias "GetUserNameExA" (ByVal NameFormat As EXTENDED_NAME_FORMAT, ByVal lpNameBuffer As String, ByRef nSize As Long) As Long ...	Perceff

09.11.2009, 16:47
voam Новичок Регистрация: 09.11.2009 Сообщений: 2	Корректное закрытие ОКНА Excel Добрый день! Подскажите, пожалуйста, каким образом можно решить следующую задачу. Я написал скрипт (макрос), который выполняется в момент открытия книги, после чего книга тут же закрывается. Однако если вызывать метод ThisWorkbook.Close, то закрывается именно сама книга скрипта, но не окно Excel, в котором эта книга была открыта. Если же применять метод Application.Quit, то закрываются любые открытые на данный момент окна Excel. Мне же необходимо "уничтожить" только то окно, в котором выполнялся мой скрипт. Подозреваю, что данная операция осуществляется при помощи API-функций. Но основная проблема, с которой я столкнулся в их применении - это получение дескриптора "моего" окна Excel. Порывшись в сети, наткнулся на функцию FindWindow, однако она в качестве параметра принимает переменную lpClassName, а как получить ее значение для моего приложения я не знаю ... Может быть, есть иные способы реализовать закрытие окна?.. Буду очень признателен за помощь!

Ads