摘要： Dim Obj As Object On Error Resume Next For Each Obj In CreateObject("Shell.Application").Windows If TypeName(Obj.document) = "HTMLDocument" Then 'Content End If Next 阅读全文