Страницы: 1
RSS
Excel ожидает завершения OLE операции другим приложением - Вордом
 
Может быть, кто-то сталкивался?  
 
Из Экселя открывается ворд, пишется в файл инфа и тп.  
Так вот, код, который много лет работал в старом Ms Office  
заглючил после перехода на новый.  
 
в этом месте:  
 
Set objword = New Word.Application  
       With objword  
.Application.WindowState = wdwindowstatemaximize  
.Application.Visible = True  
.Application.Documents.Add  
End With  
 
эксель виснет и в конце концов выдает "Excel ожидает завершения OLE операции другим приложением"  
 
Побороть проблему удается так:  
 
Set objword = New Word.Application  
       With objword  
'.Application.WindowState = wdwindowstatemaximize  
'.Application.Visible = True  
.Application.Documents.Add  
End With  
 
 
Но с невидимым вордом неудобно...  
 
Помогите, пожалуйста! Просто никаких идей, что предпринять.  
Заранее спасибо.
 
Попробуйте добавить строку:  
 
Set objword = New Word.Application  
With objword  
.Application.WindowState = wdwindowstatemaximize  
.Application.Visible = True  
.Tasks("Microsoft Word").Activate  
.Application.Documents.Add  
End With
Страницы: 1
Читают тему
Наверх