Bonjour le forum. J'ai bricolé un bout de code qui permets de supprimer des onglets selon une liste de création.
J'aimerais que cette liste suive aussi la suppression.
Plus de détails en pièce jointe.
Je vous remercie d'avance de me dire si une possibilité existe
en remplaçant ton code par celui-ci, l'usf disparaitra à chaque suppression de feuille
et sera automatiquement remis à jour à la prochaine ouverture
il serait utile de prévoir un test pour empêcher la suppression de la première feuille
Code:
Private Sub CommandButton1_Click()
Dim i As Integer
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) Then Sheets(.List(i)).Delete 'Preview:=True
Next
End With
Unload Me
End Sub
Merci phlaurent55 pour cette rapide réponse, mais je me rend compte que je me suis mal exprimé.
En fait, j'aimerais que le ou les noms disparaissent aussi de la liste pricipale.
Encore merci si c'est posible