GetSetting and SaveSetting

[Fan924]

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/2004/10/11/storing-data-in-the-registry/

 

[Harald Staff]

You are storing
section:="PlayerData"
and reading
section:="PlayeData"

HTH. Best wishes Harald

 

[Chip Pearson]

Its a typo:

section:="PlayeData", _

you're missing the "r" at the end of Player.

Cordially,
Chip Pearson
Microsoft Most Valuable Professional
Excel Product Group, 1998 - 2009
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)

 

[Fan924]

You are storing
section:="PlayerData"
and reading
section:="PlayeData"

Error in web page example. That explains it not working. Thanks.