Discussion :

[renaultt2]

Bonjour

En VBA, je crée une feuille que je mets à la fin des feuilles.
Je veux renommer cette feuille en un mois de l'année. (changement chaque mois).
Je crée une variable

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MaVar = InputBox("Saisir le mois")

Puis quand je veux renommer la feuille, je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Feuil1").Name = " & MaVar & "

Mais voila la feuille est renommée en & MaVar &.

Comment je peux faire ???
Merci
Cordialement

[mfoxy]

Bonjour,

Tu devrais plutot coder comme ceci.

Attention, il serait bon de vérifier l'existence d'une feuille du même nom dans le classeur avant le renommage ( cfr blog de Pierre Fauconnier), ainsi que de géré une input box non remplie.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Sub CreateSheet()
Dim mytext as String
 
mytext = InputBox("Saisir le mois")
 
    With ThisWorkbook
        .Sheets.Add(After:=.Sheets(.Sheets.Count)).Name = mytext
    End With
End Sub

[renaultt2]

Merci, mais le mois suivant je mais quoi comme code ???
Aujourd'hui, je veux créer juilllet mais le mois prochain jke dois créer Aout.
Cordialement

[mfoxy]

??

Le même code, vu que le nom de la feuille sera la variable récupérée dans ton Inputbox.

Cependant, pour une gestion de donnée, il est souvent plus simple de ne travailler qu'avec un seul onglet global où tu listerait tes données avec une colonne supplémentaire Mois, les données de chaques mois pourrait être vue indépendamment des autres mois par simple filtre.