我正在尝试从xmlhttp中抓取元素。我使用vba还不错,但我对数据抓取还比较陌生。我之前一直在使用ie。 我可以将html导入到单元格中,但我想具体导入名称、id、价格和库存水平。 我用于导入数据的代码是 Private Sub HTML_VBA_Excel()
Dim oXMLHTTP As Object
Dim sPageHTML As String
Dim sURL As String
'Change the URL before executing the code
sURL = &
我想刮谷歌搜索结果右边的数据使用VBA。我能够抓取结果,但不是我需要的确切结果。下面是屏幕截图,我用红色标记了我需要刮掉的东西。
我在VBA中尝试了下面的代码,但总是有运行时错误。如何解析到每个部分并获取span标记中的值。
VBA:
Set html = CreateObject("htmlfile")
html.body.innerHTML = XMLHTTP.ResponseText
Set objResultDiv = html.getElementById("rhs_block")
Set objH3 = objResultDiv.getEl
我正在尝试使用VBA从网站上抓取数据。首先,我使用消息框来显示文本,它是工作。然后,我尝试将其输出到Cell it occurred error,这是我不理解的错误。 这是我的代码: Sub macro()
Dim IE As New SHDocVw.InternetExplorer
Dim html As New MSHTML.HTMLDocument
Dim web As String
Dim sale1 As Variant, a As String
web = "https://www.vndirect.com.vn/portal/bao-cao-ket-qua-kinh-
我正在尝试整理以下链接"www.tutorialspoint.com/ VBA /index.htm“右侧窗格中给出的vba课程项目列表。 但由于某些错误,我无法抓取列表: Sub tutorailpointsscrap()
Dim ie As InternetExplorer
Set ie = New InternetExplorer
With ie
.navigate "https://www.tutorialspoint.com//vba/index.htm"
.Visible = True
我已经用vba编写了一些脚本来解析从torrent站点指向下一个页面的链接。我的脚本能够抓取它们。然而,我面临的问题是在结果中出现了几个重复的链接。我的问题是,是否有什么技术可以让我只解析唯一的链接?
Sub TorrentData()
Dim http As New XMLHTTP60, html As New HTMLDocument, post As Object
With http
.Open "GET", "https://yts.ag/browse-movies", False
.send
我很难在一个集合中检索一组链接。所有其他页面元素都响应普通的get命令,但这些命令除外。在这里,对HTML和javascript的了解将产生红利。我自己猜测,是因为href是javascript命令的错误,还是隐藏在“清除”或“清除”类之后,将它们隐藏起来?我的最终目标是能够从javascript中抓取链接。
任何帮助都是非常感谢的。谢谢
Public Function getNewsMAIN()
Dim strURL As String: strURL = _
"http://www.londonstockexchange.com/exchange/prices-and-m
我正在编写VBA网络抓取软件,从网络上抓取产品名称,并将它们添加到Excel工作表。这段代码一分钟前还能正常工作,然后突然就停止了抓取信息。你知道问题出在哪里吗?网站仍在运行,未更改任何已检查的变量。下面是我的代码: Dim http As New XMLHTTP60, html As New HTMLDocument, x As Long
With http
.Open "GET", "https://www.notebooksbilliger.de/pc+hardware/grafikkarten+pc+hardware/amdati/rx+6600+a
我正试着从网站上抓取一些特定的原始文本。通过这个站点和其他资源,我学习了如何使用simpleXML和xpath获取特定的图像。
然而,同样的方法似乎不适用于抓取原始文本。这是目前不起作用的地方。
// first I set the xpath of the div that contains the text I want
$xpath = '//*[@id="storyCommentCountNumber"]';
// then I create a new DOM Document
$html = new DOMDocument();
// then
我是网络,使用Excel 从Excelv.16中的Chrome网页中抓取数据。因为我是在处理病人的数据,所以我不能提供很多信息。(最初,我用VBA为IE编写了代码。)
以下是html:
下面是我的原始VBA代码,它运行得很好:
With ActiveWorkbook.Worksheets(1)
Dim DIVS As Object
Dim Div As Object
Dim Num1 As Long
Num1 = 0 'Initialize Num1
Set DIVS = IE.document
我试图从outlook中提取一封电子邮件,并抓取电子邮件中附加的excel表。代码工作正常,除了我无法理解如何让VBA代码只抓取今天的电子邮件,否则它会一直抓取前几天的电子邮件和保存大量的文件与当前日期。
这是我的代码:
Sub ExportOutlookTableToExcel()
Dim oLookInspector As Inspector
Dim oLookMailitem As MailItem
Dim oLookWordDoc As Word.Document
Dim oLookWordTbl As Word.Table
Dim xlApp As Excel.Applicati
我一直在努力学习网络抓取技术,并在这个问题上碰壁。我知道VBA不是最好的web抓取工具,但在我的工作中,我们没有能力使用Python或其他工具。只有Excel和VBA。主要的目标是从不同的网站抓取表格数据,在大多数情况下,使用一个表的站点是可以的,但是我遇到了一个有多个表的网站,我无法隔离该表,甚至无法将所有的表都拖到Excel表上。我当前的代码只取第一个表,我尝试修改代码以获取每个游戏表的点数,但我无法理解它。
如果有人能帮忙的话,我已经干了好几天了。
提前谢谢。
Sub GetHTMLDocumentXML()
Dim XMLPage As New MSXML2.XMLHTTP6
我正在使用VBA从一个html文档中抓取数据。文档中有一个iframe。我可以使用web浏览器的"inspect元素“查看文本;但是,我不能使用VBA访问它。这是我正在使用的代码,它与其他元素一起工作得很好。
Sub NewMain()
Dim i As Integer
Dim IE As InternetExplorer
Dim sc As MSHTML.IHTMLElementCollection
Dim scObj As MSHTML.IHTMLGenericElement
Set objShell = CreateObject("Shell.Application
我正在尝试使用JAVA中的JSoup库从网页中抓取数据。然而,这里的问题是,我想要抓取的数据是基于XML加载的,所以当我试图从HTML解析它时,它会显示出来
<div id="report-details-container">
<!-- Container where HTML template will be loaded based on XML -->
</div>
而不是完整的HTML,它只显示这个注释。
我如何抓取数据,因为在inspect元素中我可以看到完整HTML。
我想从dropdown https://wm.watchsystems.com/stpsocivil/realestatesl.html中为每个日期抓取网站表 我不得不使用Excel/VBA,但很难找到下拉对象来使用循环选择每个日期 我尝试了getElementsByName来选择整个销售列表,也尝试了通过id来获取元素,我无法从下拉列表中选择正确的日期 Set Post = objIE.document.getElementByAttributeName("cboSaleDate")
For Each elem In Post.getElementsByTagName(&
我正在使用VBA进行网络抓取。下面是html结构和我的VBA代码。
当我运行它时,我得到了这个文本ETA : 2020-08-26 (Reference only, the date will be updated according to shipments).
但我只想把它的日期记下来,2020-08-26
<div style="font-size: 14px;">
<span class="label" style="font-weight: bolder; font-size: 13px;">ETA