(excel) macro

Résolu/Fermé
olive60 Messages postés 253 Date d'inscription vendredi 7 septembre 2007 Statut Membre Dernière intervention 21 décembre 2010 - 10 sept. 2007 à 17:10
Landoltp Messages postés 68 Date d'inscription mercredi 1 août 2007 Statut Membre Dernière intervention 14 mars 2008 - 10 sept. 2007 à 19:34
Bonjour a tous !

Voici mon souci :

Jai 4 feuilles dans mon classeur "Hypotheses" "Produits" "Charges" "Résultat". Dans la feuille "Hypothses" jai quatre Boutons permettant de faire varier des valeurs selon 4 Hypotheses. Voici le code de la macro du premier bouton "Hypothèse 1":

Sub Bouton40_QuandClic()
Range("D6").Select
ActiveCell.FormulaR1C1 = "2"
Range("D8").Select
ActiveCell.FormulaR1C1 = "1"
Range("C37").Select
ActiveCell.FormulaR1C1 = "2"
Range("C38").Select
ActiveCell.FormulaR1C1 = "1"
Range("C41").Select
ActiveCell.FormulaR1C1 = "1"
Range("C42").Select
ActiveCell.FormulaR1C1 = "1"
Sheets("Charges").Select
Range("F16").Select
ActiveCell.FormulaR1C1 = "=4"
Sheets("Hypothèses").Select
Sheets("Charges").Select
Range("G16").Select
ActiveCell.FormulaR1C1 = "=4"
Sheets("Hypothèses").Select
End Sub


MA question est : Quand jappuie sur ce bouton jaimerais voir inscrit dans les cellules E35 (feuille hypothèses) B3 (feuille produits) E5 (feuille charges) et J10 (feuille résultat) >>>" Hypothèse 1"

Comment puis-je faire??

MERCI BCP A CELUI QUI ME REPONDRA !!!!
A voir également:

1 réponse

Landoltp Messages postés 68 Date d'inscription mercredi 1 août 2007 Statut Membre Dernière intervention 14 mars 2008 1
10 sept. 2007 à 19:34
salut, ça doit donner qqch comme ça...

Sheets("Hypothèses").Select
Range("E35").Select
ActiveCell.FormulaR1C1 = "Hypothèese 1"

Sheets("Produits").Select
Range("B3").Select
ActiveCell.FormulaR1C1 = "Hypothèese 1"

Sheets("Charges").Select
Range("E5").Select
ActiveCell.FormulaR1C1 = "Hypothèese 1"

Sheets("Résultats").Select
Range("J10").Select
ActiveCell.FormulaR1C1 = "Hypothèese 1"

mais je viens de remarquer que t'as déjà trouvé la solution...
0