décocher case à cocher

Dranreb

XLDnaute Barbatruc

• 4 Septembre 2011

• #2

Re : décocher case à cocher

Bonjour.
Sans examiner plus avant le fichier, ce que je vais faire, c'est à se demander pourquoi il y a une case qu'on ne devrait donc jamais voir cochée !?
Je regarde maintenant.
À+

Oui, ce n'est qu'un exemple de possibilité, si au lieu de taper dans la liste le nom du magasin vous y mettiez un renvoi vers la C1 de la feuille du bon magasin, il serait possible d'analyser cette formule dans une Workseet_SelectionChange et d'activer la feuille concernée.
À+

 

Dernière édition: 4 Septembre 2011

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 4 Septembre 2011

• #3

Re : décocher case à cocher

Bonjour,


Merci Dranreb de vous intéresser à mon problème.
Tout d'abord mes cases à cocher ont vocation à ... être cochées!!!
Mais une fois qu'on a coché et que elles m'ont emmenée au magasin voulu, lorsque je reviens à la liste, et que je fais cela plusieurs fois vers les différents magasins, je ne veux pas que dans ma liste toutes les cases à cocher apparaissent cochées en même temps.
Je souhaiterais que seul mon dernier choix apparaisse coché.
Le plus simple est de regarder dans mon fichier, vous pourrez constater que sur la 1ère feuille toutes les cases sont cochées en même temps et c'est ça que je ne veux pas.

Par ailleurs,comment pourrais-je faire un renvoi sans passer par un lien hypertexte?
Puis-je vous demander ce qu'est une WORKSEEF SELECTIONCHANGE?

Merci pour votre éclairage

 

Vote positif 0 Vote négatif

Fred0o

XLDnaute Barbatruc

• 4 Septembre 2011

• #4

Re : décocher case à cocher

Bonjour à tous,

A mon avis, le plus simple et le plus logique est d'utiliser des boutons d'option et non des cases à cocher. En effet, avec les boutons d'option, on ne peut faire qu'un choix et un seul.

Voir exemple.

A+

 

Pièces jointes

• case à cocher.xls

  45.5 KB · Affichages: 71
• case à cocher.xls

  45.5 KB · Affichages: 68
• case à cocher.xls

  45.5 KB · Affichages: 66

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 4 Septembre 2011

• #5

Re : décocher case à cocher

Une coche en wingding me semble faire l'affaire
À+

 

Pièces jointes

• SolutionWingding.xls

  46.5 KB · Affichages: 74

Vote positif 0 Vote négatif

F

Fo_rum

XLDnaute Accro

• 4 Septembre 2011

• #6

Re : décocher case à cocher

bonjour,

Ce ne sont pas les méthodes qui manquent.

 

Pièces jointes

• Aller Feuiln.xls

  48 KB · Affichages: 89

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 4 Septembre 2011

• #7

Re : décocher case à cocher

Bonsoir,

Un grand merci à vous tous, vos solutions me conviennent tout à fait.
Je les regarderai de plus près demain et vous tiens au courant
@+

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 5 Septembre 2011

• #8

Re : décocher case à cocher

Bonsoir,
J'y ajoute la mienne
A+
kjin

 

Pièces jointes

• melba.xls

  36.5 KB · Affichages: 78
• melba.xls

  36.5 KB · Affichages: 78
• melba.xls

  36.5 KB · Affichages: 83

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 5 Septembre 2011

• #9

Re : décocher case à cocher

Encore un grand merci à tous pour votre contribution.
Toutes les solutions proposées fonctionnent et j'ai maintenant l'embarras du choix.
Je pense que la case d'option conviendra très bien dans mon fichier.
@+

 

Vote positif 0 Vote négatif

M

melba

XLDnaute Occasionnel

• 5 Septembre 2011

• #10

Re : décocher case à cocher

Bonsoir,

J'ai un problème , j'ai voulu masqué toutes les feuilles "magasin1", "magasin2" etc et dans ce cas lorsque je clique sur mes cases d'option de la feuille "liste", mes macros ne fonctionnent pas.
En effet j'avais affecté des macros à mes cases d'option.
Une idée?
Merci par avance

 

Vote positif 0 Vote négatif

Fred0o

XLDnaute Barbatruc

• 5 Septembre 2011

• #11

Re : décocher case à cocher

Bonsoir Melba,

Tu peux rajouter cette commande pour chaque case à cocher :

VB:

Sheets("magx").Visible = True

Puis sur la macro qui renvoie vers la feuille contenant les boutons d'option :

VB:

Sub retourliste()
'
' retourliste Macro
'

'
    ActiveSheet.Visible = False
    Sheets("Feuil1").Select
    Range("F1").Select
End Sub

A+

 

Vote positif 0 Vote négatif