使用Vba查找HTML标记中使用的属性

使用Vba查找HTML标记中使用的属性,html,excel,vba,internet-explorer,Html,Excel,Vba,Internet Explorer,我正在通过vba解析HTML代码。我没有读取HTML文件,而是获取已打开IE的对象并解析HTML。 现在,我可以得到标记名及其属性值。但是我找不到使用的属性。 比如说, META HTTP-EQUIV="Content-Type" CONTENT="text/html; CHARSET=iso-8859-1" 在这个元标记中,我可以使用 For Each a In ie.document.all.tags("META") Debug.Print a.getAttribute("content

我正在通过vba解析HTML代码。我没有读取HTML文件,而是获取已打开IE的对象并解析HTML。 现在,我可以得到标记名及其属性值。但是我找不到使用的属性。 比如说,

META HTTP-EQUIV="Content-Type" CONTENT="text/html; CHARSET=iso-8859-1"
在这个元标记中,我可以使用

For Each a In ie.document.all.tags("META")
 Debug.Print a.getAttribute("content")
Next

但我需要的是“HTTP-EQUIV”、“CONTENT”、“CHARSET”,而不是它的值。有没有办法获得标签中使用的服装?我试了很久了。不可能成功

您可以在元素属性上循环:

Dim a
For Each a In ie.document.all.tags("META").attributes
 Debug.Print a.value
Next

编辑:列出所有可能的属性,即使是未使用的属性。我想这就是IE中的工作原理-你必须通过检查是否有值来过滤掉实际使用的属性,或者尝试检查每个属性的
指定的
属性值。

你是否尝试过循环
a.attributes
?@Tim Williams我刚刚尝试过,我可以得到属性。非常感谢。但是我得到的是所有的属性,而不是已经使用过的属性。对于a.Attributes Debug.Print q.Name和q.Value Next中的每个q,我像这样循环