Erreur avec GetSetting et SaveSetting

[yves03]

Bonjour à tous,

J'utilise des Textbox dans un Userform pour entrer des valeurs que j'appelle avec GetSetting et que je sauvegarde avec SaveSetting.

Private Sub UserForm_Initialize()
TextBox1.Value = GetSetting("Mes parametres", "Textbox1", "Valeur Textbox1")
TextBox2.Value = GetSetting("Mes parametres", "Textbox2", "Valeur Textbox2")
end sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
SaveSetting "Mes parametres", "Textbox1", "Valeur Textbox1", TextBox1.Value
SaveSetting "Mes parametres", "Textbox2", "Valeur Textbox2", TextBox2.Value
End sub

Cela fonctionne tres bien, par contre j'ai voulu mettre le fichier sur un autre PC et la ça ne fonctionne plus, j'ai des erreurs, en fait je crois qu'il ne trouve pas "Mes parametres"
Comment contourner ce probleme ?
Merci d'avance

 

[Staple1600]

Re : Erreur avec GetSetting et SaveSetting

Bonsoir

C'est logique
Puisque les valeurs sont entrées dans la base de registre
du premier pc.

 

[yves03]

Re : Erreur avec GetSetting et SaveSetting

Y a t'il une solution à mon probleme ?
Merci d'avance

 

[Staple1600]

Re : Erreur avec GetSetting et SaveSetting

Re


Sans doute

En ne passant pas par la base de registe

mais par un fichier.ini ou un fichier.txt
qui recevraient la valeur des TextBox (Les paramètres)

 

[yves03]

Re : Erreur avec GetSetting et SaveSetting

Re


Sans doute

En ne passant pas par la base de registe

mais par un fichier.ini ou un fichier.txt
qui recevraient la valeur des TextBox (Les paramètres)

Merci de ta reponse, par contre si quelqu'un pouvait m'aider car je ne sais pas comment mettre ça en place
Merci encore

 

[Staple1600]

Re : Erreur avec GetSetting et SaveSetting

Re


Voir la pièce jointe

(Le code VBA a été repris dans l'aide VBA
La touche F1 est trop souvent laissée pour compte 😉

PS: Décompresse l'archive à la racine de C:\

 

[yves03]

Re : Erreur avec GetSetting et SaveSetting

Merci beaucoup pour ton aide
🙂