B BRUNO62 XLDnaute Occasionnel 31 Mai 2010 #1 Bonsoir, J'ai une macro qui fonctionne bien, je souhaiterai qu'à chaque changement de mois cette formule soit modifiée automatiquement. Ex/ 12 avril (4) ; 01 juin (6) Range("D4").Select ActiveCell.FormulaR1C1 = "=RC[-1]*4" Est ce possible ? Bonne soirée. A+
Bonsoir, J'ai une macro qui fonctionne bien, je souhaiterai qu'à chaque changement de mois cette formule soit modifiée automatiquement. Ex/ 12 avril (4) ; 01 juin (6) Range("D4").Select ActiveCell.FormulaR1C1 = "=RC[-1]*4" Est ce possible ? Bonne soirée. A+
Hulk XLDnaute Barbatruc 31 Mai 2010 #2 Re : Question macro Hello Bruno, Peut-être un truc du style... Code: Private Sub CommandButton1_Click() Dim x As Date x = Now 'ou 'x = CDate("12.04.2010") Range("D4").Value = Range("D4").Offset(0, -1).Value * Month(x) End Sub Donc en D4, il affiche C4 multiplié par le nombre du mois voulu. Dernière édition: 31 Mai 2010 Vote positif 0 Vote négatif
Re : Question macro Hello Bruno, Peut-être un truc du style... Code: Private Sub CommandButton1_Click() Dim x As Date x = Now 'ou 'x = CDate("12.04.2010") Range("D4").Value = Range("D4").Offset(0, -1).Value * Month(x) End Sub Donc en D4, il affiche C4 multiplié par le nombre du mois voulu.
B BRUNO62 XLDnaute Occasionnel 1 Juin 2010 #3 Re : Question macro Bonjour, bonjour Hulk. J'ai intégré ta solution dans ma macro. C'est ok. Je suis heureux. Merci ! Bonne journée. A+ Vote positif 0 Vote négatif
Re : Question macro Bonjour, bonjour Hulk. J'ai intégré ta solution dans ma macro. C'est ok. Je suis heureux. Merci ! Bonne journée. A+