Automatiser la mise à jour d'une cellule

Bonjour à tous!

J'ai un petit problème dans un tableau Excel :

J'ai 12 colonnes qui correspondent au 12 mois de l'année.
Chaque début de mois, je rentre dans une des lignes de mon tableau un pourcentage (correspondant au budget dépensé ce mois-ci), qui s'applique dans un calcul qui concerne tous les mois restants (pour faire une prévision de ce que je vais dépenser).

Exemple : Le 1er janvier je renseigne 14% = de février à décembre 14% de prévision,

Le 1er février je renseigne 12% = de mars à décembre 12% de prévision,

Le 1er mars je renseigne 9% = avril à décembre 9% de prévision, etc.

Y-a-t-il un moyen d'automatiser le changement dans les cellules qui calculent ?

Par exemple: au mois de janvier, j'ai 14%, grace à un calcul simple, ce pourcentage s'applique aux mois de février à décembre.

Mais si au mois de février je rentre 12%, comment je fais pour que ce pourcentage remplace le 14% de janvier dans les mois restants?

En espérant trouver ma réponse ici :)

Merci beaucoup et à bientôt

Bonjour à tous,

Il serait judicieux de joindre à votre demande un exemple (anonymisé) de votre classeur Excel afin que nous puissions vous aider au mieux.

(Il est inutile de multiplier les sujets pour une même problématique )

Bonjour, bonjour JFL,

Soit une zone nommée AirePrevisions correspondant à la zone de saisie des pourcentages.

Dans votre module d'onglet, l'événement Worksheet_Change :

Private Sub Worksheet_Change(ByVal Target As Range)

Dim I As Integer

If Target.Count > 1 Then Exit Sub

If Not Intersect(Target, Range("AirePrevisions")) Is Nothing Then
   For I = Target.Column To Range("AirePrevisions").Count
       Range("AirePrevisions")(I).Value = Target.Value
   Next I
End If

End Sub