首页 > 解决方案 > Vba Excel,当前日期的问题

问题描述

我正在搜索打开文档时的日期,我在其中通过邮件发送了文档,但几天后我打印了一个与当前日期不匹配的日期。它会打印出我发送此文件的日期

Sub GetCurrentDate()
    Dim S$

    With CreateObject("MSXML2.XMLHTTP")
        .Open "GET", "http://www.fechadehoy.com/venezuela", False
        .send
        S = .responseText
    End With

    With CreateObject("htmlfile")
        .body.innerHTML = S
        ConjuntoB = .getElementById("fecha").innerText
    End With
End Sub

有什么办法不会发生这种情况吗?每天我可以从网上提取日期吗?

标签: excelvbaweb-scraping

解决方案


推荐阅读