Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Корректно завершить работу с листом и книгой EXCEL
 
 автор: час   (05.10.2007 в 13:37)   личное сообщение
 
 

Что- то после создания одного листа и закрытия книги
при вторичном открытии прозрачный лист и пока приложение ACCESS не закроешь и не откроешь вновь работать в екселе не удаётся.

  Ответить  
 
 автор: osmor   (05.10.2007 в 13:41)   личное сообщение
 
 

зависит от того как его открыли
http://hiprog.com/forum/read.php?id_forum=1&id_theme=2319&page=1

  Ответить  
 
 автор: час   (05.10.2007 в 13:46)   личное сообщение
 
 

Dim ExlDb As New Excel.Application
Dim WrkBk As Workbook, WrkSht As Worksheet, _

Set WrkBk = ExlDb.Workbooks.Add
Set WrkSht = WrkBk.ActiveSheet
ExlDb.Visible = True
////////////////////////////////////////

........................................

ExlDb.activeWorkbook.Close
Set WrkSht = Nothing
Set WrkBk = Nothing

  Ответить  
 
 автор: osmor   (05.10.2007 в 15:16)   личное сообщение
 
 

Не использую раннее связывание, по этому тонкостей не знаю, но я бы попробовал так

Dim ExlDb As Excel.Application
Dim WrkBk As Workbook, WrkSht As Worksheet, _

Set ExlDb = New Excel.Application

Set WrkBk = ExlDb.Workbooks.Add
Set WrkSht = WrkBk.ActiveSheet
ExlDb.Visible = True
////////////////////////////////////////

........................................

ExlDb.activeWorkbook.Close
ExlDb.close 
Set WrkSht = Nothing
Set WrkBk = Nothing
set ExlDb = nothing

  Ответить  
 
 автор: час   (05.10.2007 в 15:52)   личное сообщение
 
 

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

ааааааааа вот , вот
Полный список констант приложений MS OFFICE 2003

  Ответить  
 
 автор: час   (05.10.2007 в 15:56)   личное сообщение
 
 

CreateObject("Excel.Application")

  Ответить  
 
 автор: час   (05.10.2007 в 15:58)   личное сообщение
 
 

нашёл
Используя MS Excel, MS Word и другие приложения MS Office из ACCESS я предпочитаю использовать "позднее связывание", это (на мой взгляд) позволяет избавиться от ссылок и упрощает перенос приложений.

не то...

  Ответить  
 
 автор: час   (06.10.2007 в 10:22)   личное сообщение
 
 

никак не удаётся оцепиться от ехеля
лист становится прозрачным даже при открытии мышкой любой книжки
пока не закроешь access
кто сталкивался??? что за ....?

ExlDb.ActiveWorkbook.Close
ExlDb.Close
ExlDb.Quit
не помогает

  Ответить  
 
 автор: akkorn   (01.12.2007 в 20:25)   личное сообщение
 
 

где-то в аксессе есть код, держащий в памяти ссылку на ваш файл ексель...
ну или линкованная таблица, из которой сделана выборкаи висит в памяти эта переменная....

советую попробовать
-закрыть аксесс
-нажать ctrl-alt-del и посмотреть в списке приложений excel (если книги не открыты- его там быть не должно)
- запустить аксесс с shift
- опять открыть ctrl-alt-del и посотреть, присутствует ли там строчка EXCEL
- закрыть аксесс и открыть его нормально (без shift)
- снова посотреть список процессов...

...ну а дальше уже по процедурам...


во.. еще надыбал (как вариант):
 автор: osmor   (14.08.2007 в 15:18)  
Предлагаю создавать не Excel.Sheet
а "excel.application"
и уже в нем создавать книги листы и т.п. ну и закрывать апликейшен 

мож поможет..


еще раз перечитав, обратил внимание на обьявление переменной:
у вас Dim ExlDb As New Excel.Application
а точно работает такой код Dim ExlDb As Excel.Application

удачи!

  Ответить  
 
 автор: час   (01.12.2007 в 22:24)   личное сообщение
 
 

Спасибки..Вам .......
Бум попробовать... .

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList