Vill man byta namn på en nyckel får man nog satsa på att ta bort och sen lägga till igen (tror jag iaf). Eventuellt kan du titta på RegSaveKey och RegLoadKey för att spara ett helt nyckel-"träd" till disk och sen läsa in det igen med ett annat namn (lite overkill kanske?).
Vill du bara ändra ett strängvärde kan du använda denna:
Public Sub savestring(hKey As Long, strPath As String, strValue As String, strdata As String)
Dim keyhand As Long
Dim r As Long
r = RegCreateKey(hKey, strPath, keyhand) 'Skapas inte om den redan finns.
r = RegSetValueEx(keyhand, strValue, 0, REG_SZ, ByVal strdata, Len(strdata))
r = RegCloseKey(keyhand)
End Sub