mémoriser choix checkbox si fermeture du fichier

carlos · 22 Février 2006

Bonjour

Comment garder en mémoire les choix opérés sur des checkbox (sans passer par des cellules) ?
Avec aussi la possiblité de retrouver ces choix si on ferme le fichier.

Merci

Charly2 · 22 Février 2006

Bonjour carlos, bonjour à toutes et à tous 🙂

Si tu ne souhaites pas passer par des cellules, peut-être que des noms cachés pourront te convenir.

Tu as un exemple dans le fichier joint.

[file name=Checkbox_carlos.zip size=11815]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Checkbox_carlos.zip[/file]

A+ 😉

carlos · 22 Février 2006

Re:mémoriser choix checkbox si fermeture du fichie

Bonsoir charly , bonsoir le forum

Ca marche impeccable mais je n'arrive pas à comprendre ce que tu as fait.

C'est quoi :

Names.?
RefersTo:= ?
Names('oCB1').RefersTo ?

Si tu as qq doigts engourdis par le froid tu pourrais les réchauffer en m'expliquant .

Amicalement Carlos

Charly2 · 22 Février 2006

Re:mémoriser choix checkbox si fermeture du fichie

Bonsoir carlos, bonsoir à toutes et à tous 🙂

Il ne fait pas froid ici, mais tu vas pouvoir faire travailler les muscles de tes yeux 😉

A partir d'une feuille d'un classeur, tu peux définir un nom par le menu Insertion / Nom / Définir. Dans la boîte de saisie tu as 'Nom dans le classeur' et 'Fait référence à'. Je pense que tu as compris que le code fait la même chose mais sous vba.

Peut-être que ce code-ci sera plus parlant car plus concis ! Sacré Hervé :woohoo: 🙂 😛 T'inquiète carlos, c'est entre nous, on s'amuse à faire des codes plus blancs que blancs :silly:

Code:

Option Explicit

Private Sub CommandButton1_Click()
 
  Names.Add Name:='oCB1', RefersTo:=CInt(CheckBox1), Visible:=False
  Names.Add Name:='oCB2', RefersTo:=CInt(CheckBox2), Visible:=False
  Names.Add Name:='oCB3', RefersTo:=CInt(CheckBox3), Visible:=False
  Unload Me
End Sub
 
Private Sub UserForm_Initialize()
  On Error Resume Next
  CheckBox1 = Evaluate(Names('oCB1').RefersTo)
  CheckBox2 = Evaluate(Names('oCB2').RefersTo)
  CheckBox3 = Evaluate(Names('oCB3').RefersTo)
  On Error GoTo 0
End Sub

Merci Hervé 😉

La différence avec les noms définis dans un classeur, c'est que l'on peut déclarer des noms cachés à partir de vba...

A+

carlos · 22 Février 2006

Re:mémoriser choix checkbox si fermeture du fichie

Merci beaucoup Charly 2 , bonsoir Hervé ,bonsoir le forum

Je vais potasser (de potassium) sur tes explications ...
D'ailleurs Hervé m'a souvent fait faire de la gymnastique de l'esprit aussi.
En tout cas merci beaucoup pour tes explications et ton aide .

Carlos

mémoriser choix checkbox si fermeture du fichier

carlos

XLDnaute Impliqué

Charly2

Nous a quittés en 2006

Pièces jointes

carlos

XLDnaute Impliqué

Charly2

Nous a quittés en 2006

carlos

XLDnaute Impliqué

Discussions similaires

mémoriser choix checkbox si fermeture du fichier

carlos

XLDnaute Impliqué

Charly2

Nous a quittés en 2006

Pièces jointes

carlos

XLDnaute Impliqué

Charly2

Nous a quittés en 2006

carlos

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency