2017-03-05 62 views
-1

我试图从本网站使用VBA格式文本的元素名称在此代码我想在VBA擅长

<div class="train-logo 
     train-logo-monochrome 
     train-logo--trenitalia-monochrome 
     train-logo--frecciarossa-monochrome" title="Trenitalia"> 
    </div> 

VBA提取,提取元素的网页标题:

For Each treno In IE.Document.getelementsbytagname("div") 
    If treno.getattribute("title") Then 
     Cells(rownumber2, "u").Value = treno.innertext 
+1

你是怎么做到的,当你运行你的代码时会发生什么? –

+0

我已经开发了一个关于excel的宏,这个宏转换为互联网开采者并且以价格为例来获取元素。在这种情况下,我想从格式文本获得标题=“trenitalia”https://www.trainline.eu/search/milano/firenze/2017-03-21-14:00 – cory

+0

如果您有代码,最好将它包含在你的问题中,否则它可能会被关闭。 –

回答

0

东西像这应该工作:

Dim treno, t 

For Each treno In IE.Document.getelementsbytagname("div") 
    t = treno.getattribute("title") 
    If t <> "" Then Cells(rownumber2, "u").Value = t 
Next treno 

这不是从你的问题说明你需要多少,这些从页面改为:如果只有一个你可以Exit For获得价值后。

+0

宏运行但不要粘贴价值标题的细胞再次阅读网页 – cory

+0

非常感谢蒂姆威廉姆斯 – cory