Suppression de feuille Excel

Bonsoir le forum

comment allez vous ? Bien j'espere

j'ai un bouton dans mon userform qui me permet d'ouvrir une nouvelle feuille avec nom numero du mois et année...

je dispose aussi d'un combobox ou je peux afficher toutes les feuilles et choisir là ou je dois envoyer les informations.

J'aimerais savoir si je peux supprimer une feuille au choix.

Si oui merci de bien vouloir m'aider

voici le code de mon bouton qui me permet d'ajouter des feuilles a mon classeur

Private Sub CommandButton8_Click()
    Dim Nom As String, i As Byte, Verif As Boolean, myMonth As Integer, myYear As Integer, myDate As Date, ee As String, a As Long
    Dim sh_new As Worksheet

    myDate = Date ' enregistre la date d'aujourd'hui dans la variable myDate
    myMonth = (Month(myDate))  ' No du mois précédent
    myYear = Year(Date) 'No année
    ee = ""

    Verif = False
    While Not Verif
        Nom = InputBox("Définissez le nom du nouveau svp", "Ajout nouveau ")
        If Nom = "" Then
            If Not sh_new Is Nothing Then Application.DisplayAlerts = False: sh_new.Delete
            Exit Sub
        End If

        If sh_new Is Nothing Then
            With wb_avions
                .Sheets(1).Copy After:=.Sheets(.Sheets.Count): Set sh_new = ActiveSheet
            End With
        End If

        On Error Resume Next
        sh_new.Name = Nom & "" & (myMonth) & " - " & myYear
        If Err Then MsgBox "la feuille " & Nom & " existe déjà, veuillez choisir un autre nom" _
        Else Verif = True
    Wend

    Unload Me
    UserForm1.Show
End Sub

Bonjour,

pour supprimer une feuille

    Application.DisplayAlerts = True
    sh.Delete
    Application.DisplayAlerts = True

je peux créer un bouton et mettre dedans ?

Faut-il encore définir quelle feuille tu veux supprimer ... sh n'est pas ici défini

Un fichier excel serait nécessaire pour aller plus loin

a la place de ton sh

je vais mettre le resultat de mon combobox au fait

je n'ai pas encore essayé mais je pense que ça pourra passer

hé bien voilà ...

remplace sh par sheets(ici_le_resultat_du_combobox).delete

oui merci

a la prochaine