(3430 depuis hier)
(13293 depuis hier)
(264 depuis hier)Modifier la base de registre
Voici quelques lignes qui permettent de manipuler des clés et des valeurs dans la base de registres sans passer par des API Windows.
L'utilisation de RegWrite et RegRead ne permettent pas de gérer des clés ou valeurs contenant des antislashs "\" dans leur nom.
Lire une valeur
Lit la valeur de "Valeur chaine" dans "HKCU\Software\XlWiki".
Dim ws As Object Set ws = CreateObject("Wscript.Shell") MsgBox ws.RegRead("HKCU\Software\XlWiki\Valeur Chaine")
Modifier ou créer une valeur
Valeur chaine
Dim ws As Object Set ws = CreateObject("Wscript.Shell") ws.RegWrite "HKCU\Software\XlWiki\Valeur Chaine", "Excel"
Valeur REG_DWORD
Dim ws As Object Set ws = CreateObject("Wscript.Shell") ws.RegWrite "HKCU\Software\XlWiki\Valeur Dword", 1234, "REG_DWORD"
Valeur REG_BINARY
Dim ws As Object Set ws = CreateObject("Wscript.Shell") ws.RegWrite "HKCU\Software\XlWiki\Valeur Bin", 1234, "REG_BINARY"
Supprimer un élément
Supprimer une valeur
Supprime "Valeur chaine" dans "HKCU\Software\XlWiki" :
Dim ws As Object Set ws = CreateObject("Wscript.Shell") ws.RegDelete "HKCU\Software\XlWiki\Valeur chaine"
Supprimer une clé
Supprime la clé "HKCU\Software\XlWiki\" :
Dim ws As Object Set ws = CreateObject("Wscript.Shell") ws.RegDelete "HKCU\Software\XlWiki\"
N'oubliez pas l'antislash "\" à la fin de la clé.
Mots clefs associés à cette page : base, registre
- Vous devez vous identifier ou créer un compte pour écrire des commentaires
XlWiki est utilisé comme
XlWiki est utilisé comme exemple ici ! Il faut bien sur adapter...
Misange