Suivi de numérotation sur différentes feuilles excel

Résolu

Service clients Messages postés 12 Date d'inscription Statut Membre Dernière intervention -
eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention - 6 févr. 2014 à 17:54

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

A voir également:

Pagination excel plusieurs feuilles
Liste déroulante excel - Guide
Formule moyenne excel plusieurs colonnes - Guide
Word et excel gratuit - Guide
Regrouper plusieurs feuilles excel en une seule - Guide
Classer par ordre alphabétique excel plusieurs colonnes - Guide

3 réponses

Réponse 1 / 3

Zoul67 Messages postés 1959 Date d'inscription Statut Membre Dernière intervention 149

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+

Zoul67 Messages postés 1959 Date d'inscription Statut Membre Dernière intervention 149

D'après ta précision :

For Each s In Workbook.Sheets
s.Name=s.Range("G1").Value
Next s

Service clients Messages postés 12 Date d'inscription Statut Membre Dernière intervention

Merci de ton retour mais je ne comprends pas trop ton explication.
En même temps je n'y connais pas grand chose à excel.
Merci d'être plus précis si possible

Réponse 3 / 3

eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention 7 275

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

Discussions similaires

Excel - Numérotation pages plusieurs feuilles

Fonction N° de page sur excel

Ne pas paginer derniére pages

Rapport : Ne pas Numéroter les 3 premières pages (LIBRE OFFICE)

Pagination continue avec changement de section

folio : nommer la page n°3 page n° 1

Votre réponse

Discussions similaires