Bonjour à tous,


J'aimerais boucler sur toutes les cellules d'une colonne d'un ListObject; en sachant que je connait le nom de la colonne sur laquelle je souhaite boucler.


Pour mon code ne fonctionne-t-il pas ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Dim Tbl As ListObject
Dim Cell1 As Range
 
Set Tbl = Sheets("ExtractionsPoste").ListObjects("TableauDonneesTriPoste")
 
For Each Cell1 In Tbl.Columns("Noms").Cells
 
'Une instruction
 
Next Cell1
Merci d'avance pour l'aide