søge i registry

Hej E.

Jeg har følgende kode:

Private Sub Form_Load()
Dim Jakob As String
Jakob = RegQueryValue(HKEY_CURRENT_USER, "Software\UserData\Default\jakobtest\", "FirmaNavn")

MsgBox " " & Jakob & ""

End Sub

Mit problem er at jeg gerne vil have den til at søge alle under mapperne igennem efter keys som hedder FirmaNavn.
De er alle placeret i stien HKEY_CURRENT_USER\Software\UserData\?????\jakobtest\FirmaNavn

???? er de mapper som jeg ikke ved hvad hedder.

Har i en god ide til hvordan jag kan få den til at søge i registry efter nøglen Firmanavn??