nommer automatiquement les onglets

[RDB]

bonjour,

j'ai besoin d'attribuer un nom automatiquement aux onglets d'un claseur à partir d'une liste.

par exemple : sur un liste de 10 nims sur la feuille 1, ces noms nomment automatiquement les intitulés sur l'onglet de la feuille 2, feuille 3, feuille 4 etc...

Comment faire.

Merci de votre aide

 

[Hady]

Sub NommerFeuilleEnAutom()

i = 1
Sheets('Feuil1').Select
While (Cells(i, 1).Value <> '')
Sheets.Add
NomTmp = ActiveSheet.Name
Sheets(NomTmp).Move After:=Sheets(i + 1)
Sheets(NomTmp).Name = Sheets('Feuil1').Cells(i, 1).Value
i = i + 1
Sheets('Feuil1').Select
Wend

End Sub

Dans ma macro les noms des onglets sont stockés dans la colonne 1 de Feuil1

 

[RDB]

Bonjour,

Merci de la réponse.

Cela marche, mais, cette macro doit renommer des feuilles de calculs déjà existantes.

Par exemple : une feuille nommée Extra 1 en Emmanuel.

Pour mon tableau ma liste va de B6 à B30 et de E6 à E30.

Merci pour ton aide.

@+



:huh:

 

[Hady]

Sub NommerFeuilleEnAutom()
Dim i As Integer
Dim NouveauNom As String
i = 6
Sheets('Feuil1').Select
While (Cells(i, 2).Value <> '')
NouveauNom = Sheets('Feuil1').Cells(i, 5).Value
Sheets(Cells(i, 2).Value).Name = NouveauNom
i = i + 1
Sheets('Feuil1').Select
Wend
End Sub

Voilà

 

[RDB]

re bonjour

merci de la réponse si rapide.

J'ai vu , essayé, mais cela ne marche pas. Mon explication ne doit pas être complète.
Afin d'eviter une multitudes de questions et de ....lasser.
Je joins le fichier exemple pour une meilleure compréhention.


merci d'avance.

@+ [file name=travhoraires.zip size=20582]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/travhoraires.zip[/file]

 

[Hady]

D'après ton fichier, j'ai une question : tu veux renommer
Jean-Luc
Emmanuel
Rachid
Daniel
Nicolas

EN

Extra 26
Extra 27
Extra 28
Extra 29
Extra 30

OU EN autre chose et à ce moment je voudrais savoir en quoi.Thx

 

[RDB]

RE...


merci pour la rapidité.

La réponse, j'ai une activité ou j'emploie des extras de manière ponctuelle. Et pour cette activité, j'ai besoin de calculer les heures de missions à payer.
Comme ces personnes ne sont jamais les mêmes, je ne veux pas à avoir à re-créer de nouvelles fiches de calculs.

Donc je cherche à renommer les onglets afin de faciliter la recherche (il y a en moyenne 50 pers.).

Je peux être amener à renommer Jean-luc etc... qui ne sont que des exemples pour le fichier. Cependant, je ne veux pas renommer la feuilles Renseignements.

J'espère que j'ai étais clair..et, merci de ton aide..vraiment.

@+

 

[Hady]

oki je vois très bien now

 

[Hady]

Voilà :side:
Bonne soirée et soit sympa avec les extras!

 

[Hady]

En zippant c'est mieux... [file name=travhoraires_20050707174439.zip size=21501]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/travhoraires_20050707174439.zip[/file]

 

[RDB]

bonsoir,


Génial, merci du coup de main.

@+