Class: IHTMLElementCollection
IHTMLElementCollection
Reference:
dim objElement as IHTMLElement set objElement = objDoc.all(0)
Usage example: (print tagnames of all elements in the ActiveDocument to the Immediate Window):
Dim objDoc As DesignerDocument
Dim objElement As IHTMLElement
Set objDoc = ActiveDocument
For i = 0 To objDoc.all.Length - 1
Set objElement = objDoc.all(i)
Debug.Print _
i & _
" = " & _
objElement.tagName
Next i
Usage example output:
0 = html 1 = head 2 = meta 3 = title 4 = meta 5 = meta 6 = link 7 = body 8 = div 9 = div 10 = h1 11 = p 12 = a 13 = a 14 = a 15 = webbot 16 = div 17 = script 18 = script 19 = webbot 20 = div 21 = p 22 = p 23 = webbot 24 = div 25 = pre 26 = br 27 = br 28 = br 29 = br 30 = br 31 = br 32 = br 33 = br 34 = webbot 35 = p 36 = webbot 37 = div 38 = pre 39 = br 40 = br 41 = br 42 = webbot 43 = p 44 = webbot 45 = div 46 = pre 47 = br 48 = br 49 = br 50 = webbot 51 = p 52 = webbot 53 = div 54 = pre 55 = br 56 = br 57 = br 58 = webbot 59 = p 60 = webbot 61 = div 62 = pre 63 = br 64 = br 65 = br 66 = webbot 67 = p 68 = p 69 = p 70 = p 71 = p 72 = p 73 = webbot 74 = div 75 = p 76 = a 77 = a 78 = a 79 = webbot 80 = webbot
See Also:
Elements, Definition (w3schools)