excel vba microsoft win32 regkey code example

Example: excel vba read registry key value

'VBA function to READ from the Windows Registry:

Public Function RegRead(Key$) As String
    On Error Resume Next
    With CreateObject("wscript.shell")
        RegRead = .RegRead(Key)
    End With
    If Err Then Err.Clear
    On Error GoTo 0
End Function

'NB: Always backup the Windows Registry before accessing it!