Modifier une feuille dans UserForm

Résolu
Bonjour,
Selon la pièce jointe, serait-il possible d'ajouter une commande pour modifier le nom d'une feuille?
Merci beaucoup

https://www.cjoint.com/c/KEqiGPSJK4l

2 réponses

  1. Contributeur
    Bonjour,

    sélectionnez la feuille à renommer dans la listBox:

    voici le code du bouton:

    Private Sub CommandButton1_Click()
    Dim nom As String
    nom = InputBox("Saisissez le nouveau nom", "Renommer", "mafeuille")
    If nom = "" Then Exit Sub
    Worksheets(ListBox1.Value).Name = nom
    End Sub
    


    Voilà

    0
    1. Merci beaucoup Le Pivert, une fois de plus vous m'avez bien aidé
      Cordialement
      0