Из VB узнать полный путь открытых EXCEL

Формулировка задачи:

Подскажите пожалуста как из VB узнать полный путь открытых EXCEL . Например открыта в данный момент Книга.xls узнать её путь : C:\Temp\Книга.xls и так по всем открытым книгам. Спасибо за ответ.

Решение задачи: «Из VB узнать полный путь открытых EXCEL»

textual
                            Листинг программы 
                        
Dim e As Object, w As Object
Set e = GetObject(, "Excel.Application")
For Each w In e.workbooks
    if w.windows(1).visible then Debug.Print w.fullname
Next

Оцени полезность:

10 голосов , оценка 3.9 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы