This code:
<code style="color: rgb(0, 96, 0);">Option Explicit</code>
<code style="color: rgb(0, 96, 0);">Private pKey As Long</code>
<code style="color: rgb(0, 96, 0);">Private pName As String</code>
<code style="color: rgb(0, 96, 0);">Private pChildren As Collection</code>
<code...