|
|
|
Прверить открыта ли Excel книга
|
|||
|---|---|---|---|
|
#18+
HI all Хотелось бы проверить открыта ли другая книга: И написать что-то в роде: If Workbooks("Sp.xls") = True Then {набор операторов} Else MsgBox("Файл Sp.xls не запущен") End If Сам макрос находится в другой книге. Подскажите плиз. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.12.2003, 13:40 |
|
||
|
Прверить открыта ли Excel книга
|
|||
|---|---|---|---|
|
#18+
For Each wb in Workbooks If wb.Name="Sp.xls" then 'книга есть exit for End if Next wb или On Error Resume Next Set wb=Worbooks("Sp.xls") if wb is nothing then 'книги нет ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.12.2003, 13:51 |
|
||
|
|
start [/forum/topic.php?fid=60&fpage=392&tid=2170339]: |
0ms |
get settings: |
8ms |
get forum list: |
13ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
76ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
2ms |
| others: | 230ms |
| total: | 379ms |
| 0 / 0 |
