multiplication dans une plage de données

Dranreb

XLDnaute Barbatruc

• 22 Août 2011

• #2

Re : multiplication dans une plage de données

Bonjour
C'est possible avec Copier, Collage spécial, Coller: Tout et Opération: Multiplication
Cordialement

 

Vote positif 0 Vote négatif

S

sri75

XLDnaute Occasionnel

• 22 Août 2011

• #3

Re : multiplication dans une plage de données

Bonjour, j'ai testé mais je ne vois pas comment lui indiquer que c'est par 10 qu'il faut que la plage soir multipliée, pour l'instant ma plage se multiplie par elle même !

Merci de m'indiquer où j'ai manqué une étape

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 22 Août 2011

• #4

Re : multiplication dans une plage de données

Vous Tapez 10 en A1, Copier, Sélectionner la plage à toucher, Collage spécial avec multiplication.
À+

 

Vote positif 0 Vote négatif

S

sri75

XLDnaute Occasionnel

• 22 Août 2011

• #5

Re : multiplication dans une plage de données

Effectivement c'était très simple !

Après trois semaines de vacances mon esprit n'était plus à excel........

Merci et bonne journée

 

Vote positif 0 Vote négatif

S

sri75

XLDnaute Occasionnel

• 22 Août 2011

• #6

Re : multiplication dans une plage de données

re bonjour, auriez vous la commande pour automatiser une procédure sur une plage ?

Du type sur la plage D5:F8 pour toutes les cellules incluses dans la plage si la cellule est supérieure à 10 alors ...

Merci d'avance

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 22 Août 2011

• #7

Re : multiplication dans une plage de données

À tester:

VB:

Sub Limiterà10()
Dim Cel As Range
For Each Cel In ActivSheet.[D5:F8]
   If Cel.Value > 10 Then Cel.Value = 10
   Next Cel
End Sub

Remarque: ActivSheet.[D5:F8] peut être remplacé par Selection si la macro sera lancée après avoir sélectionné la plage à traiter.
À+

 

Vote positif 0 Vote négatif

S

sri75

XLDnaute Occasionnel

• 22 Août 2011

• #8

Re : multiplication dans une plage de données

Comme ça , ca fonctionne :

Sub Limiterà10()
Dim Cel As Range

For Each Cel In Range("D5:F8")

If Cel.Value > 9 Then Cel.Value = Cel.Value * 10
Next Cel
End Sub


Merci et bonne journée

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 22 Août 2011

• #9

Re : multiplication dans une plage de données

En rajoutant le "e" que j'avais oublié, ActiveSheet.[D5:F8] devrait fonctionner aussi.

 

Vote positif 0 Vote négatif