Sauvegarder des fonctions, effacer un bouton macro
bonjour
j'ai fait une feuille contenant 2 grilles, avec chaque fois une fonction qui fait le total ;
j'ai aussi fait deuw boutons macro pour remises à zero, où un seul fonctionne
mes question :
1) comment enlever le bouton (commandbutton) de trop
2) des que j'ai fait remise à zero, ca marche, mais dans ma 2eme grille, la fonction total disparait
j'aurai une derniere question (subsidiaire)
3) en fait, ma ligne "titre" efface aussi à chaque fois ses valeurs quand j'active le bouton de remise à zero (les titres des colonnes sont les coupures en euro : 5€, 10€, etc...)
ça fait beaucoup, mais c'est certainement tout bête
remerciements anticipés à tout eventuel sauveur
Bonjour,
1) comment enlever le bouton (commandbutton) de trop
Clique droite sur le bouton puis utilise la touche DELETE ou SUPPRIMER de ton clavier.
ou
va par menu / AFFICHAGE / BARRE / BOITE OUTILS CONTROLE et clique sur le bouton CREATION (la petite équerre)
Sélectionne le bouton puis appuies sur la touche DELETE ou SUPPRIMER de ton clavier.
Pour le reste, on peut être ton "sauveur" moyennant un petit fichier sans données confidentielles.
A te relire
Amicalement
Dan
Merci de m'avoir répondu.
Je vous joints le fichier excel incriminé: si vous cliquez sur la macro, vous verrez qu'une fonction totalisatrice disparaît ainsi qu'une ligne grisée fixe de titre.
Je vous remercie d'avance pour votre aide
@+ ptkntz
Bonsoir,
Trop de guillemets dans ton code...
Essayes avec :
Private Sub CommandButton1_Click()
Range("B2:H5,B9:H10").ClearContents
End SubSuggestions de formules :
=SOMME(B2:B5)Au lieu de
=(B2+B3+B4+B5)=SOMMEPROD(B1:H1*B2:H2)au lieu de
=(5*B2+10*C2+20*D2+50*E2+100*F2+200*G2+500*H2)A bientôt
re,
Pour ta macro, ton instruction n'est pas correcte car l'effacement demandé se passe entre B2 et H10.
Change ta ligne
Range("b2:h5", "b9:h10").ClearContentspar ceci
Union(Range("b2:h5"), Range("b9:h10")).ClearContentsou ceci :
Range("b2:h5").ClearContents
Range("b9:h10").ClearContentsAmicalement
Dan
Salut Dan,
La ligne que j'ai mis marche bien :
Range("B2:H5,B9:H10").ClearContentsC'est ce que tu obtiens avec l'outil d'enregistrement.
Salut Sylvain,
Je n'ai jamais dit le contraire dans mon post. C'est un autre proposition simplement.
Mais toutefois assez curieusement, ce que tu proposes m'a déjà causé quelques soucis dans certains fichiers. Pourtant l'aide excel montre aussi cette manière de faire. Je n'ai jamais pu expliqué le pourquoi.
Une chose est sûre, le fait de travailler en deux instructions, plutôt qu'en une seule, fonctionne toujours.
je suis reconnaissant pour votre sagacite et votre promptitude
je n'ai ,pas encore verifié, mais je suis sur que ca debloquera le schmilblick
encore merci, et @+
ptkntz
Edit Dan := Mis résolu sur le fil.