Bonjour,
j'ai un petit souci avec ce code qui, est censé supprimé la colonne dans l'onglet "parametrage" portant le nom de la valeur de ma Combobox (qui ne fonctionne pas, et qui supprime l'onglet à ce nom (qui fonctionne)
Code: Tout sélectionner
Private Sub CommandButton1_Click()
A = ComboBox1.Value
Dim cL%, i% 'Supression colonne
cL = Worksheets("parametrage").Cells(1, 256).End(xlToLeft).Column
For i = cL To 1 Step -1
If Cells(1, i) = A Then Columns(i).Delete
Next i
Worksheets(A).Delete
End Sub
je vous joint mon fichier