multiplication dans une plage de données

[sri75]

Bonjour, je voudrais effectuer l'opération suivante :

saisir en A1 l'opération à effectuer ( ex *10 pour multiplier par 10 )

selectionner une plage de données : ex D5:F8

et ensuite faire que toutes les données présentes dans ma plage se trouvent remplacées par le résultat multiplié par 10

ex en M7 j'avais 5 , une fois la macro ternimée j'ai 50 en D5 et ainsi de suite jusqu'a F8.

Est ce réalisable ? J'ai beaucoup de mal avec les gestions de plages de données .

Est il possible de gérer le cas où une cellule soit vide dans ma plage ?

Merci à tous pour votre aide

 

[Dranreb]

Re : multiplication dans une plage de données

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

 

[sri75]

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

 

[Dranreb]

Re : multiplication dans une plage de données

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

 

[sri75]

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

 

[sri75]

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

 

[Dranreb]

Re : multiplication dans une plage de données

À tester:

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.
À+

 

[sri75]

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

 

[Dranreb]

Re : multiplication dans une plage de données

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