Bonsoir,
J'ai macro isé la fonction valeur cible sur un classeur contenant deux feuilles ("cadre" et "non cadre") mais les cellules à modifier de chaque feuille ne sont pas au même endroit donc je me suis dit que la fonction
if (je suis sur telle feuille)
then (j'applique la valeur cible aux cellules xxx)
else (j'applique la valeur cible aux cellules yy)
pourrait marcher. Mais je n'arrive à écrire correctement la condition en prenant la feuille "cadre" comme élément vrai/faux.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub ValeurCible() 'If ActiveSheet.Name = "cadre" Then If activesheet.name = worksheet("cadre") Then Range("e89").GoalSeek Goal:=Range("g89").Value, ChangingCell:=Range("g26") Else Range("e95").GoalSeek Goal:=Range("g95").Value, ChangingCell:=Range("g26") End If End Sub
Partager