boucle VBA à travers la table

' 
for i = 1 to Range("Table1").Rows.Count
   Range("Table1[Column]")(i)="PHEV"
next i
Cheerful Chipmunk