Changement automatique nom onglet

Bonsoir à tous,

J'ai un code qui me permet de changer le nom de l'onglet suivant une cellule d'une autre feuille.

Le voici :

Private Sub Worksheet_Activate()

ActiveSheet.Name = Sheets("Suivi Remunération").Range("D1")

End Sub

J'ai 12 onglets. le premier se change seul (il s'agit d'un mois mais pas forcément janvier)

Je souhaite trouver un code qui permet de changer le noms des onglets suivants en fonction du mois de l'onglet 1.

C'est à dire :

Si 1 s'appelle Février, il faut que 2 soit Mars, 3 soit Avril etc.

J'espère avoir été clair et je remercie toute personne qui m'apportera son aide.

A vous lire

Bojour,

Une proposition à étudier.

A te relire.

Cdlt.

Bonjour Jean-Eric,

Merci du temps que tu m'accordes.

Dans ton fichier, nickel, cela fait exactement ce que je recherche mais lorsque je transpose, rien ne fonctionne.

En fait, l'onglet suivi de remuneration doit conserver ce nom (c'est le premier onglet) et c'est à partir de la feuille 2 et jusqu'à la feuille 13 que le changement doit ce faire.

J'ai essayé de faire des changement mais rien ne marche.

Puis je encore te solliciter ?

Merci

Re,

A tester.

Cdlt.

Re -

Cela ne fonctionne toujours pas mais j'avance.

Le 2ème onglet doit avoir le meme mois que la cellule D1.

J'ai une erreur car ma cellule D4 est fusionnée avec la cellule D5 sur chaque feuille de 2 à 12.

J'essaye bien de bricoler des trucs mais rien n'y fait.

As tu une solution ?

Merci de ton aide précieuse.

Greg

Pour que ce soit plus clair, voici le squelette du classeur.

122exemple.xlsm (44.42 Ko)

Re,

Voir la nouvelle proposition.

Vu ton fichier, j'ai retiré le nom du mois dans la cellule D1-D2 est un en-tête de colonne...

Cdlt.

214exemple-1.xlsm (60.46 Ko)

Re -

Génial, ça fonctionne.

J'ai encore deux requêtes si tu peux et veux bien m'accorder encore du temps.

J'ai voulu passer de 12 à 24 mois mais deux onglets ne peuvent se nommer pareil.

Peut on contourner le problème en ajoutant l'année ou autre chose.

La deuxième chose, peut on renseigner le nom de l'onglet dans les cellules B du tableau ?

Merci encore de ton aide.

Greg

Bonjour,

Tout cela n'est pas réfléchi.

Si à chaque réponse, une nouvelle question se pose, on risque de se perdre.

Envoie un fichier avec des données représentatives (exemples de saisies). Ton fichier est vide de toute information.

Tu dois aussi supprimer les cellules fusionnées et déclarer des données sous forme de tableau.

http://optim18.rcac.fr/TablesExcel_13ReglesOr.pdf

Et puis précise l'objectif.

Cdlt.

31exemple-1.xlsm (94.20 Ko)

Re -

Ce n'est pas que ce n'est pas réfléchi mais je fourmille d'idée et elles ne viennent pas toutes en même temps.

Je suis conscient que pour toi , c'est pénible. Les problèmes à tiroir....

Difficile de remplir le doc car les données sont pro mais j'ai établi un exemple sur quelques lignes.

Le but est de pouvoir suivre la production de mes collaborateurs mois par mois.

Donc pour éviter le remplissage des cellules B, serait il possible que celles ci soient égales au nom de l'onglet et s'il est possible de pousser à 24 mois de suivi.

Encore merci de ton aide.

Greg

P.S : J'ai supprimé les cellules fusionnées

79exemple-1-1.xlsm (52.49 Ko)

Bonjour Jean Eric,

J'ai revu la chose.

Je reste sur 12 mois.

Peux tu m'aider pour les cellules B.

Comment les renommer comme l'onglet?

Merci de ton aide.

Bonjour à tous,

J'ai trouvé la réponse à la dernière question.

La voici :

=STXT(CELLULE("nomfichier";A1);TROUVE("]";CELLULE("nomfichier";A1))+1;20)

Si cela peut aider d'autres personnes.

Merci Jean Eric pour ton aide.

A bientôt

Rechercher des sujets similaires à "changement automatique nom onglet"