Voilà je suis plutôt débutant sous VBA et j'essaye de réaliser l'opération suivante:
- j'ai un tableau avec une série d'années
- l'utilisateur doit choisir la durée de la période qu'il veut tester avec GoalSeek, en commençant toujours avec la première année (par exemple 4 ans)
- pour la durée choisie, il peut imposer une valeur cible à la variable considérée (par exemple 0)
- ensuite le goal seek modifie la variable en appliquant la cible pour chaque année considérée
Pour m'en sortir j'ai utilisé des noms dynamiques :
Cellule à définir => A$1$:decaler(A$1$;;Nombre d'années) [les cellules visées contiennent des formules]
Valeur à atteindre => Valeur de référence définie par l'utilisateur [fait référence à une cellule d'une autre feuille]
Cellule à modifier => B$1$:decaler(B$1$;;Nombre d'années) [les cellules visées contiennent des valeurs]
Après je passe sous VBA et mon code ressemble à ceci
Range("Cellule à définir").GoalSeek goal:=Range("Valeur à atteindre"), Changingcell:=Range("Cellule à modifier")
Seulement VBA me met que mes références ne sont pas valides...
Help?
Merci beaucoup!
Effectivement plus simple avec un fichier, désolé la prochaine fois j'en prépare un mais je ne peux pas sortir les données simplement là.
Mon seul souci avec le code c'est que le décalage se fait vers le bas en fonction des lignes, hors mes données sont triées par années en colonne :s