VBA : Utilisation de "For Each"

[LUDWIG]

Bonjour,

Malgré quelques recherches sur le forum, je n'arrive pas à utiliser For Each.

Je voudrais que pour chaque cellule d'une plage nommée ( Range("TEST" ) ) une boîte de dialogue m'affiche la valeur de la cellule.

Public Sub te()
For Each Cell In Worksheets("Feuille1").Range("TEST").Cells
MsgBox Worksheets("Feuille1").Range("TEST").Cells.Value
Next Cell
End Sub

qui bien sûr ne fonctionne pas

Merci d'avance à qui voudra bien me corriger !

 

[ERIC S]

Re : VBA : Utilisation de "For Each"

Bonjour

essaie

Dim c As Range
For Each c In Sheets("Feuil1").Range("TEST")
MsgBox c.Value
Next

 

[LUDWIG]

Re : VBA : Utilisation de "For Each"

Merci !

ça marche imppec !

Et surrour j'ai compris !

Encore merci