Par une macro est il possible de faire une addition dans une plage de cellules

Bonsoir Jare

Un ptit moment que je ne t'avais vu...

Tiens ci-joint une mini démo...

Je pense que ce devrait convenir...
Pour des valeur numérique non-entier, faut faire autrement... mais pour 5 c'est OK !!

Bonne Soirée (last Saturday Night of 2002!!!)
@+Thierry

Si je comprend bien, tu veux additionner le nombre 5 à toutes les cellules de ta plage "DONNEES". Cela reviendrait alors à faire un collage special addition.

Voici une première solution en attendant d'autres très probablement.

Tu ajoutes un bouton sur ta feuille avec le code suivant :

Private Sub CommandButton1_Click()
Range("A1").Select
Selection.Copy
Application.Goto Reference:="DONNEES"
Selection.PasteSpecial Paste:=xlAll, Operation:=xlAdd, SkipBlanks:=False, Transpose:=False
End Sub

La cellule A1 dans mon exemple reprendrait le chiffre que tu désires additionner (dans ton cas, 5)

J'espère que cela te conviendra.

Bon wk

Xavier

Bonsoir Xavier

Bien vu le PasteSpécial Operation xlAdd... une bonne alternative à une boucle....

Bonne Soirée
@+Thierry

@+Thierry, Xavier

Merci à vous,

C'est bien trouver PasteSpécial de Xavier, il !
Merci encore à tous les deux, et une bonne fin d'année à vous.

Jare

bonjour


pour info, certaines fois lors de l'importation de fichiers textes vos valeurs numériques sont considérées comme du texte, que faire ?

* lors de l'importation, cliquez sur la colonne en question et définissez ses valeurs comme des valeurs standards

* après l'importation, mettez la valeur 1 dans une cellule, copiez-là, et coller la par multiplication sur les cellules rebelles


voilà tout
bye
stephane