Из 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

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