Discussion :

[stroumfette44]

Bonjour

Ce sujet existe peut être déjà mais pas moyen d'avoir un résultat à ma recherche, à chaque fois j'ai un message d'erreur

Du coup voici ma problématique.

J'ai créé la macro suivante pour me permettre de calculer la valeur cible en ayant une valeur à atteindre variable.

Sub ValeurCibleAuto()
Range("K20").GoalSeek Goal:=Range("K21"), ChangingCell:=Range("K19")
End Sub

Maintenant j'ai besoin que ce calcul se fasse à chaque fois qu'on modifie la cellule K18, la fonction s'effectue et affiche le résultat en K19.

Voici le tableau :



Est ce que vous pouvez m'aider s'il vous plait ?
ça fait bien longtemps que je n'ai pas pratiqué, mon vba est rouillé 😅

Merci d'avance !

#office365 #vba #macro #valeurcible

[Philippe Tulliez]

Bonjour,
Votre illustration aurait pu être plus complète en visualisant les numéros de lignes et colonnes de la feuille et une explication de la formule permettant d'obtenir le résultat attendu aurait été d'une aide précieuse;

Pour pouvoir déclencher la procédure il faut utiliser une procédure événementielle
Dans mon exemple, le calcul est activé dès que l'on modifie la valeur de la cellule C7 (en jaune). Valeur qui est celle à atteindre en C10

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Worksheet_Change(ByVal Target As Range)
  With Target
    If .Address = Range("C7").Address Then
      Range("C10").GoalSeek Goal:=.Value, ChangingCell:=Range("C8")
    End If
  End With
End Sub

Illustration

[stroumfette44]

Merci Philippe pour votre retour c'est parfait !

Alors sur la photo le K en haut et les chiffres à gauche correspondait justement aux numéros de ligne et la lettre de la colonne, j'aurais dû le préciser désolée ...

Je tacherais d'être plus précise la prochaine fois

En tout cas vous avez résolu mon problème, merci à vous

[Philippe Tulliez]

Bonjour,

Alors sur la photo le K en haut et les chiffres à gauche correspondait justement aux numéros de ligne et la lettre de la colonne

Effectivement, à mieux regarder, le numéro des lignes et colonnes sont bien là mais peu visibles pour mes yeux.
Ravi d'avoir pu vous aider