Suivi de numérotation sur différentes feuilles excel Résolu/Fermé

Question

Bonjour,

J'ai créé un classeur avec plusieurs feuilles.
Sur chaque feuille un numéro doit apparaitre FC140001, FC140002....
Comment puis faire pour que cela soit automatique car j'ai plus de 150 feuilles à numéroter et au fil du temps, je vais en rajouter et je voudrais qu'elle se numérote seule.
Merci d'avance

Zoul67 · Answer

Bonjour,

Tes onglets portent pas ces noms ou pas ?
Si tu veux créer une batterie d'onglets suivant ces noms, fais-le par macro.

A+

Service clients · Answer

Re bonjour,

Je précise que cette numérotation apparait dans une cellule (G1), toujours la même sur chaque feuille.

Merci

eriiic · Answer

Bonjour à tous,

code à mettre dans le module ThisWorkbook :
Private Sub Workbook_SheetBeforeDoubleClick(ByVal sh As Object, ByVal Target As Range, Cancel As Boolean)
    Dim ref As Range
    If sh.Index > 1 And Target.Address = "$G$1" Then
        Set ref = Worksheets(sh.Index - 1).[G1]
        If Left(ref, 2) = "FC" Then
            [G1].Value = "FC" & Format(Mid(Worksheets(sh.Index - 1).[G1], 3) + 1, "000000")
            Cancel = True
        End If
    End If
End Sub
Alt+F11 pour aller dans l'éditeur VBE

Ajoute ta feuille et double-clique en G1. Si la feuille précédente comporte une référence commençant par "FC" le numéro suivant est inséré.
Ta feuille doit être en dernier, je ne gère pas l'insertion de feuille au milieu. Tu aurais un doublon de numéro, à moins de changer la numérotation des feuilles suivantes (non demandé).
exemple : https://www.cjoint.com/c/DBgszF5B2cG

eric
 
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu lorsque c'est le cas (en haut vers votre titre). 
Merci

Suivi de numérotation sur différentes feuilles excel

3 réponses

Discussions similaires