如何根据已打开的文档获取路径并打开

jchang

例如，通过已经打开的office文档，自动打开文档所在的文件夹。

kevinch

office文档倒是可以实现，写个excel的，其他office组件基本类似

$prog=ObjGet("","excel.application")
If IsObj($prog) Then
        If $prog.workbooks.count>0 Then
                For $wb In $prog.workbooks
                        ;Run("explorer """&$wb.path&"""")  ;;;;只打开文件夹用这个
                        Run("explorer /select,"""&$wb.fullname&"""")    ;;;;打开文件夹并选中当前文件用这个
                Next
        EndIf
EndIf

872777825

楼上正解  哈哈