Changer le nom d'une Feuille ExcelRésolu

Question

Bonjour !
J'utilise cette formule afin de modifier ou r&#233;cup&#233;rer des donn&#233;es de diff&#233;rentes cellules d'un classeur Excel.
classeur.worksheets("Feuill1").Cells(x, y).value

Or, je d&#233;sirerai modifier le nom de ces feuilles (3 feuilles par defaut lors d'un nouveau document : Feuil1- Feuil2 et Feuil3) mais aussi en rajouter de nouvelles au fur et &#224; mesure ...

Pouvez-vous m'aider ???

Merci ..

jpleroisse · Accepted Answer

Sub NomFeuilles()    
Sheets("Feuil1").Select
    Sheets("Feuil1").Name = "Janvier"
    Sheets.Add
 End Sub

Private Sub Workbook_Open()
Call NomFeuilles
End Sub

jpleroisse

nhervagault · Answer

Voila comment faire 

    Sheets("Feuil4").Select

    Sheets("Feuil4").Name = "E"

    Sheets("Feuil2").Select

    Sheets.Add

    Sheets("Feuil5").Select





Et merci &#224; l'enregistreur de macro d'excel



Salut

cs_CanisLupus · Answer

Salut, quand je veux ajouter une feuille, j'utilise ce code :

    ' TEST SI LA FEUILLE EXISTE DEJA
    For i = 1 To Sheets.Count
    
        If Sheets(i).Name = Nom_Feuille Then
            ' traitement si elle existe d&#233;j&#224;
        End If
    
    Next

et puis :

    ' CREATION DE LA FEUILLE
    Sheets(1).Select
    Sheets.Add
    Sheets(1).Name = Nom_Feuille

    ' DEPLACEMENT DE LA FEUILLE A LA FIN DES ONGLETS
    Sheets(1).Move After:=Sheets(Sheets.Count)

Loup Gris

cs_CanisLupus · Answer

J'ai oubli&#233; une petite explik, j'utilise Sheets(1) qui d&#233;signe la 1&#232;re feuille (onglet le plus &#224; gauche), comme &#231;a, je n'ai pas &#224; me pr&#233;occuper du nom et du nombre des feuilles d&#233;j&#224; existantes.

Loup Gris

Changer le nom d'une Feuille Excel

4 réponses

Discussions similaires