Конференция VBStreets

**Чудик** » 18.12.2004 (Сб) 11:00

Вопрос касается Excel, но, по моему он не относится напрямую к VBA, почему, ниже:
xl.Sheets(1).Range(Cells(Ysel1, Xsel1), Cells(Ysel2, Xsel2)).Select
такая запись проходит в VBA, но когда я пишу это в VB для внешнего управления Excel, выдает ошибку (ошибка определения объекта).
Как это можно обойти? Именно в VB.

**GSerg** » 18.12.2004 (Сб) 11:02

with xl.Sheets(1)
.Range(.Cells(Ysel1, Xsel1), .Cells(Ysel2, Xsel2)).Select
end with

**alibek** » 18.12.2004 (Сб) 11:02

Попробуй не Cells, а xl.Sheets(1).Cells

**alibek** » 18.12.2004 (Сб) 11:03

Ай-ай-ай

Опять опередил

**Чудик** » 18.12.2004 (Сб) 11:13

Наверное, надо иметь определенный склад ума,
я бы так и не додумался, хотя указанная вами запись логична.
Спасибо!

**Чудик** » 18.12.2004 (Сб) 11:23

Я думаю, что будет не в обиду, если тут проскочит, еще вопрос с той же тематики.
Озадачен, как высветить предварительный просмотр печати листа Excel и чтоб при закрытии этого просмотра сам лист не становился видимым, потому что, как я понимаю, при переключении на предварительный просмотр мы и переключаемся на саму кнмгу.
Но на данный момент даже предварительного просмотра не могу организовать - .PrintPreview - зависает все приложение.

**alibek** » 18.12.2004 (Сб) 12:07

Не совсем понял, что нужно.
Есть скрытый инстанс Excel. Нужно сделать PrintPreview и отобразить это окно, не отображая окно самого Excel. Так? Думаю, не сделать этого.
Просто делай xl.Visible = True, а затем Preview.

**Чудик** » 18.12.2004 (Сб) 12:24

В принципе, alibek, ты понял правильно. Если предварительно делать Visible=True, то в самом деле все работает, это решает только первую часть моей сложности, вторая - это как опять скрыть книгу после закрытия предварительного просмотра, так как я не хотел бы представлять пользователю доступ к Excel. Может есть какое-то событие на этот случай? Если это не реально, пожалуйста, дай знать, чтоб я далее просто не мучился и не терял времени. Угу?

**GSerg** » 18.12.2004 (Сб) 12:51

Попробуй посмотреть, как там происходят у xl события windowactivate/windowdeactivate...

**Чудик** » 18.12.2004 (Сб) 13:27

А можно ли из VB перехватывать события Excel? Иначе никак.

**GSerg** » 18.12.2004 (Сб) 13:31

Дык ну да...
private withevents xl as excel.application

**Чудик** » 18.12.2004 (Сб) 14:28

Не понял ...
Написал private withevents xl as excel.application в Declarations формы, ниже
Private Sub Workbook_WindowActivate(ByVal Wn As Excel.Window)
MsgBox "1"
End Sub
а собитие не ловиться, в других вариантах вообще ошибки лезут. Не допру ...

**alibek** » 18.12.2004 (Сб) 14:35

Написал private withevents xl as excel.application ?
Теперь открой список объектов (левый комбобокс) и найди xl. Ну а дальше открывай правый комбобокс и смотри, какие события ты можешь ловить.

**Чудик** » 18.12.2004 (Сб) 15:21

Ребята, мне стыдно ... Туповат немного ... Видно, не вырос пока ...

Конференция VBStreets

Range

Range

Кто сейчас на конференции