Bonjour,Bonjour,
dans le fichier joint y a t-il un moyen "technique" de supprimer une colonne sur 2 à partir de la colonne BPE?
Merci/Claude
Sub SupColonne()
Dim i&
With Feuil1
For i = .[ima1].Column To .[bpe1].Column Step -2
.Columns(i).Delete
Next
End With
MsgBox "Terminé"
End Sub