VBA : Liste onglet et mise en forme de celle-ci

Bonjour,

J'ai un classeur qui contient un grand nombre de feuilles....

Du coup, j'ai une première feuille (nommée liste) qui me les listes toutes.

Le code qui fonctionne très bien est le suivant :

Sub ListerOnglets()

Range("listeonglets").ClearContents

Dim i As Integer

For i = 1 To Worksheets.Count

Cells(4 + i, 1) = Worksheets(i).Name

Next i

End Sub

Ce que j'aimerais, c'est que les cellules de la liste de feuille reprennent la mise en forme des onglets (les couleurs koi...)....

Et, savoir s'il est possible de forcer l'ouverture du fichier sur la feuille "Liste".

Please Help Me!!!!

Merci,

Bonjour,

L'ouverture sur une feuille désignée se fait avec un Select dans ThisWorkbook avec la procédure Workbook_Open()

Reprendre la couleur des onglets ... sincèrement, c'est vrament la toute première fois que je croise çà .... j'adore

Pour info, tu as combien de couleurs différentes ...???

Re,

Avec .Tab.Color, tu pourrais effectivement reprendre tes Couleurs ...

J'ai trois couleurs : bleu, vert et rouge...

Merci!!

Re,

Au fait, as-tu besoin d'aide complémentaire ou peux-tu te débrouiller tout seul avec les macros ?

J'ai rajoutée cela dans le code :

Cells(4 + i, 1).Interior.Color = Worksheets(i).Interior.Color

mais ça ne fonctionne pas.....

"Propriété ou méthode non gérée par cette objet"

Re,

Il faudrait que tu essayes :

Cells(4 + i, 1).Interior.Color = Worksheets(i).Tab.Color

Merci James007!!!!!

c'est nikel!!!Ca fonctionnne!

Bonne journée!

Sa Bilo a écrit :

Merci James007!!!!!

c'est nikel!!!Ca fonctionnne!

Bonne journée!

Au cours actuel du nickel ... j'accepte très volontiers tes remerciements ... !!!