使用VBA解析HTML文档

    Sub test()
    Dim>         With ie
            .Visible = False '显示它
            .navigate "E:\temp\divcss.html" '加载某个页面
            Do Until .readyState = 4 '等待页面加载完毕
                DoEvents
            Loop
            Set>             '开始操纵页面，或者提取数据啦
            Set>         End With




    End Sub