|
|
|
Поднять окно Excel поверх других окон
|
|||
|---|---|---|---|
|
#18+
Создаю объект excel: Set objExcel = CreateObject("Excel.Application") With objExcel .Workbooks.Add ....... bla-bla-bla .................... .Visible = True End With Все красиво получается, но окно появляется под другими окнами и его не видно, пока не свернешь другие окна, либо пока не нажмешь на мигающую иконку вновь созданного окна в панеле задач. Как его программно наверх поднять? .Visible = True .WindowState = -4137 .Windows(1).Activate не помогает ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.08.2012, 16:39:11 |
|
||
|
|
start [/forum/topic.php?desktop=1&fid=22&tid=1449490]: |
0ms |
get settings: |
8ms |
get forum list: |
11ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
229ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 239ms |
| total: | 537ms |
| 0 / 0 |
