Macro %

tototiti2008

XLDnaute Barbatruc

• 25 Avril 2009

• #2

Re : Macro %

Bonjour Finpier,

10% à quoi ? à la cellule active ?
Dans la mesure ou ton contenu est numérique, en associant ton bouton à une macro du genre :

Code:

Sub Plus10()
    If IsNumeric(ActiveCell.Value) Then ActiveCell.Value = ActiveCell.Value * 1.1
End Sub

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 25 Avril 2009

• #3

Re : Macro %

Bonjour,

Dans le code du bouton crée, tu mets (si la valeur à majorer est en A1) :

Range("A1").value=Range("A1").value*1.1

Cordialement

 

Vote positif 0 Vote négatif

F

FINPIER

XLDnaute Nouveau

• 25 Avril 2009

• #4

Re : Macro %

Merci a vous de votre reponse,
voila j'ai une liste de poid de A1 a A200 et je voudrai ajouter 10% en plus a cette liste.
mais je veut faire une macro car ces valeur change souvent.
merci d'avance

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 25 Avril 2009

• #5

Re : Macro %

Bonjour mécano41,
Re,

Tu enregistres une macro comme ça :

tu tapes 1,1 dans une cellule
tu copies la cellule
tu sélectionnes tous tes poids
Tu fais un collage spécial valeurs : multiplication

 

Vote positif 0 Vote négatif

mth

XLDnaute Barbatruc

• 25 Avril 2009

• #6

Re : Macro %

Bonjour le fil

Le problème est que si tu cliques sur ton bouton, il arrivera un moment où tu ne sauras plus quelle est la valeur d'origine, et si tu as déjà rajouté tes 10% ou pas.
Le mieux (à mon avis qui n'engage que moi ) est de conserver ta valeur d'origine en A et de mettre ta valeur à +10% en B, soit avec les macros qui t'ont été proposées (mais en les adaptant à la colonne B), soit en mettant sur toutes tes lignes de la colonne B une simple formule du genre en Bx = Ax*1.1

Bon après-midi à tous

mth

 

Vote positif 0 Vote négatif

F

FINPIER

XLDnaute Nouveau

• 25 Avril 2009

• #7

Re : Macro %

merci TOTOTITI2008
c'est exactement ce que je voulait
merci de votre reactivité

 

Vote positif 0 Vote négatif