1 Bouton de remise à zéro de plusieurs Cellul Résolu/Fermé

Question

Bonjour,
quelqu'un peut il m'aider ?
Voici mon problème : J'ai 6 cellules comportant des listes déroulantes. Les 6 sont sélectionnées à chaque fois. J'aimerais pouvoir avoir un bouton pour réinitialiser les 6 en même temps c'est à dire qu'elles apparaissent vides (bien sûr mes listes restent toujours en place). 
Avez vous une solution à me proposer, voici un lien vers un exemple de mon fichier.
http://www.cijoint.fr/cjlink.php?file=cj200910/cijBMireyX.xls 

Merci d'avance.

Mike-31 · Accepted Answer

Salut,

Un code pour effacer tes cellules en conservant les listes de validations

Private Sub CommandButton1_Click()
    [A14:F14].ClearContents
End Sub

Ci joint ton fichier avec un bouton, ton niveau de sécurité est trop élevé, règle le sur moyen
(Outils/Macro/Sécurité/sélectionner moyen) sur le fichier c'est déjà fait à l'ouverture une boite de dialogue te demande si tu accepte d'activer les macros, accepter avec un niveau de sécurité élevé les macro sont automatiquement désactivées. Il est possible de se créer une signature électronique afin de ne pas avoir à autoriser l'activation de cette macro ou d'avoir un niveau de sécurité élevé

https://www.cjoint.com/?kEvxinH0Pn

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

el-doyon · Answer

Génial Mike ! c'est exactement ce que je voulais obtenir. C'est simple et efficace, parfait, un grand merci et aussi pour l'info de sécurité que j'ignorais.

A+

Mike-31 · Answer

Re, 

si tu ne veux pas à avoir autoriser l'activation de la macro à chaque ouverture du fichier tu peux te créer une signature électronique et authentifier le code 

a la place du bouton on aurai pu activer l'effacement avec un simple clic droit sur une des cellules

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

Mike-31 · Answer

Re,

Fait une recherche du fichier SELFCERT DEMARRER/Rechercher/Tous les fichier et tous les sous dossiers/

dis moi si tu l'as sur ta bécane

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

Mike-31 · Answer

Re,

Quel est ta version d'Excel

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

el-doyon · Answer

Office 2003

Mike-31 · Answer

Pour commencer tu vas créer ta signature et on verra après

Cliques sur le bouton Démarrer, dans Tous les programmes, cliques sur Microsoft Office, sur Outils Microsoft Office, puis sur Certificat numérique pour les projets VBA. Dans le champ Nom de votre certificat, saisis un nom simple comme ton pseudo el-doyon par exemple ou titi etc ... 
Lorsque le message de confirmation du certificat s'affiche, cliquez sur OK. 

Dès que tu auras fait, reviens sur la discussion

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

Mike-31 · Answer

Suivant le post 9, crées ta signature et on reprend cette discussion demain en fin de matinée, je t'expliquerai comment se servir de cette signature

bonne nuit

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

el-doyon · Answer

Bonjour Mike,

j'ai crée ma signature comme expliqué, je ne pourrais pas être là en fin de matinée, si c'est simple pour la suite explique moi et j'essayerai ce soir, merci e bonne journée,

A+
el-doyon

Mike-31 · Answer

Re,

Dans cette discussion j'ai donné la marche à suivre pour utiliser une signature numérique

https://forums.commentcamarche.net/forum/affich-14984584-signature-numerique

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

el-doyon · Answer

Merci Mike, c fait,
A+
el-doyon

1 Bouton de remise à zéro de plusieurs Cellul

11 réponses

Discussions similaires