L
laclac
Guest
Bonjour à tous, et joyeux noel !
J'ai un souci avec le code simplifié ci-dessous.
Quand je le lance à partir de la feuil1, il fonctionne très bien.
Mais si je le lance à partir de la feuil2, la boucle for fait qu'un seul tour.
(Les valeurs a tester sont bien dans la feuil1.)
Voici mon code :
Dim Cellule As Range
For Each Cellule In Sheets("feuil1").Range("A1:Z1")
If Cellule.Value = "Case Y" Then
ActiveWorkbook.Names.Add Name:="exemple", RefersTo:="=Feuil1!" & Cellule.Address
End If
Next Cellule
J'ai un souci avec le code simplifié ci-dessous.
Quand je le lance à partir de la feuil1, il fonctionne très bien.
Mais si je le lance à partir de la feuil2, la boucle for fait qu'un seul tour.
(Les valeurs a tester sont bien dans la feuil1.)
Voici mon code :
Dim Cellule As Range
For Each Cellule In Sheets("feuil1").Range("A1:Z1")
If Cellule.Value = "Case Y" Then
ActiveWorkbook.Names.Add Name:="exemple", RefersTo:="=Feuil1!" & Cellule.Address
End If
Next Cellule