OVH Cloud OVH Cloud

bouton de mise a blanc des zones saisies

4 réponses
Avatar
claudy03
Je voudrais pouvoir effacer toutes mes cellules de saisi
en un seul clique. Je pense que c est avec une macro mais
je ne sais pas en faire. Quelqu un pourrais il m aider?

Merci

4 réponses

Avatar
jerrykhann
Bonsoir Claudy

une solution sans macro :
Tu selectionnes ta zone de saisie (qu'elle soit continue ou discontinue n'a
pas d'importance), tu fais "insertion-nom-definir" et tu tapes par exemple
efface dans la boite qui s'ouvre...
lorsque tu veux effacer par la suite cette zone, tu fais "Edition-atteindre"
(raccourci F5) et tu choisis le nom de la plage nommée que tu veux atteindre
(ici c'est efface)... tu tapes CTRL+SUPPR et le tour est joué !

bon, si tu veux passer par macro, c'est possible, mais c'est un peu plus
compliqué :-)


"claudy03" a écrit dans le message de
news:077901c37946$34693e90$
Je voudrais pouvoir effacer toutes mes cellules de saisi
en un seul clique. Je pense que c est avec une macro mais
je ne sais pas en faire. Quelqu un pourrais il m aider?

Merci


Avatar
Bruno
Bonjour,
Une solution, serait :
Sélectionner un bouton à partir de la "boite à outil à outil contrôle"
Double cliquer sur le bouton dessiné
Et écrire sous la fenêtre qui s'ouvre :

Private Sub CommandButton1_Click()
Range("a1:b2;c2:d2").ClearContents
End Sub

A+++
Bruno

"jerrykhann" a écrit dans le message de
news:
Bonsoir Claudy

une solution sans macro :
Tu selectionnes ta zone de saisie (qu'elle soit continue ou discontinue
n'a

pas d'importance), tu fais "insertion-nom-definir" et tu tapes par exemple
efface dans la boite qui s'ouvre...
lorsque tu veux effacer par la suite cette zone, tu fais
"Edition-atteindre"

(raccourci F5) et tu choisis le nom de la plage nommée que tu veux
atteindre

(ici c'est efface)... tu tapes CTRL+SUPPR et le tour est joué !

bon, si tu veux passer par macro, c'est possible, mais c'est un peu plus
compliqué :-)


"claudy03" a écrit dans le message de
news:077901c37946$34693e90$
Je voudrais pouvoir effacer toutes mes cellules de saisi
en un seul clique. Je pense que c est avec une macro mais
je ne sais pas en faire. Quelqu un pourrais il m aider?

Merci






Avatar
Claudy03
je vient d essayer la solution de bruno et ca fait rien, ca dit, "la methode
range de l objet worksheet a echoué (erreur d execution 1004)?



"Bruno" a écrit dans le message de news:
3f623cc2$0$5590$
Bonjour,
Une solution, serait :
Sélectionner un bouton à partir de la "boite à outil à outil contrôle"
Double cliquer sur le bouton dessiné
Et écrire sous la fenêtre qui s'ouvre :

Private Sub CommandButton1_Click()
Range("a1:b2;c2:d2").ClearContents
End Sub

A+++
Bruno

"jerrykhann" a écrit dans le message de
news:
Bonsoir Claudy

une solution sans macro :
Tu selectionnes ta zone de saisie (qu'elle soit continue ou discontinue
n'a

pas d'importance), tu fais "insertion-nom-definir" et tu tapes par
exemple


efface dans la boite qui s'ouvre...
lorsque tu veux effacer par la suite cette zone, tu fais
"Edition-atteindre"

(raccourci F5) et tu choisis le nom de la plage nommée que tu veux
atteindre

(ici c'est efface)... tu tapes CTRL+SUPPR et le tour est joué !

bon, si tu veux passer par macro, c'est possible, mais c'est un peu plus
compliqué :-)


"claudy03" a écrit dans le message de
news:077901c37946$34693e90$
Je voudrais pouvoir effacer toutes mes cellules de saisi
en un seul clique. Je pense que c est avec une macro mais
je ne sais pas en faire. Quelqu un pourrais il m aider?

Merci










Avatar
isabelle
bonjour Claudy,

il faut mettre la propriété du bouton TakeFocusOnClick à false

isabelle


je vient d essayer la solution de bruno et ca fait rien, ca dit, "la methode
range de l objet worksheet a echoué (erreur d execution 1004)?

"Bruno" a écrit dans le message de news:
3f623cc2$0$5590$
Bonjour,
Une solution, serait :
Sélectionner un bouton à partir de la "boite à outil à outil contrôle"
Double cliquer sur le bouton dessiné
Et écrire sous la fenêtre qui s'ouvre :

Private Sub CommandButton1_Click()
Range("a1:b2;c2:d2").ClearContents
End Sub

A+++
Bruno

"jerrykhann" a écrit dans le message de
news:
Bonsoir Claudy

une solution sans macro :
Tu selectionnes ta zone de saisie (qu'elle soit continue ou discontinue
n'a

pas d'importance), tu fais "insertion-nom-definir" et tu tapes par
exemple


efface dans la boite qui s'ouvre...
lorsque tu veux effacer par la suite cette zone, tu fais
"Edition-atteindre"

(raccourci F5) et tu choisis le nom de la plage nommée que tu veux
atteindre

(ici c'est efface)... tu tapes CTRL+SUPPR et le tour est joué !

bon, si tu veux passer par macro, c'est possible, mais c'est un peu plus
compliqué :-)


"claudy03" a écrit dans le message de
news:077901c37946$34693e90$
Je voudrais pouvoir effacer toutes mes cellules de saisi
en un seul clique. Je pense que c est avec une macro mais
je ne sais pas en faire. Quelqu un pourrais il m aider?

Merci