I can write data to the registry with the following example. I am not
having any luck reading it back and storing it in a worksheet.
Suggestions?
__________________________________

Sub ChangeName(sName As String)
SaveSetting appname:="Euchre", _
section:="PlayerData", _
key:="Name", _
setting:=sName
End Sub

Function GetName()
GetName = GetSetting(appname:="Euchre", _
section:="PlayeData", _
key:="Name")
Range("A1").Value = GetName
End Function

Sub TestIt()
ChangeName "Sick"
MsgBox GetName
End Sub
__________________________________

http://www.dick-blog.com/archives/20...-the-registry/