Le mercredi 11 Avril 2007 ? 12:16 par Didier NOVARIN :
Bonjour!
De la meme maniere je souhaite v?rifier que la cellule C38 de ma feuille 1
contenant une liste de mots, a la valeur "valeur1" ou "valeur2" pour, selon
cette valeur effectuer un ciblage sur la cellule H4 ou H12 sur la feuille 5
(valeur cible I1, cellule variable : F1).
Le code suivant pr?sente-t-il quelque chose de faux?
Sub cible()
If UCase(Range("C38")) Like "*Valeur1*" Then
Sheets("Feuil5").Select
Range("H4").Select
Range("H4").GoalSeek Goal:=Range("I1").Value, ChangingCell:=Range("F1")
Sheets("Feuil1").Select
Else
Sheets("Feuil5").Select
Range("H12").Select
Range("H12").GoalSeek Goal:=Range("I1").Value, ChangingCell:=Range("F1")
Sheets("Feuil1").Select
End If