deux cellule donne le nom a mon onglet

[thibaut]

bonjour a tous
j'ai créer une petite macro qui logiquement a la fin de la procedure doit prendre le nom des deux cellules (ici C1010) et les mettre en nom de l'onglet mais je ne sais pas pourquoi il ne veu pas prendre cette fonction pour lui donner le nom
si vous aviez une petite idée

merci
thibaut
ps : je peu vous mettre tout le code de la fonction si vous voulez

Range("C1010").Select
Application.CutCopyMode = False
Selection.Copy
Windows("MODELVISIO.xls").Activate
Sheets("FICHE DE VISIONNAGE MODEL").Select
Sheets("FICHE DE VISIONNAGE MODEL").Name = ""
Windows("FICHE AT WORK.xls").Activate
Windows("MODELVISIO.xls").Activate
Application.CutCopyMode = False
Sheets(" ").Copy After:=Workbooks("FICHE AT WORK.xls").Sheets(8)
Windows("MODELVISIO.xls").Activate
ActiveWindow.Close
ActiveWorkbook.Save

 

[thibaut]

pascal76
d'un coup j'ai un peu honte pour mes deux premiere questions :-(
cependant les fichiers créée se placent avant la feuille qui genere la macro et non pas apres la derniere feuille du classeur
voici le code que j'ai (grace a toi ) ajouter
Sheets.Copy After:=Workbooks("FicheAtWork.xls"). Sheets(Sheets.Count)
j'ai mis en pj le doc original pour que tu puisse te fair une vrais idée du besoin

je pense ausssi que tu vas trouver que de copier 26 fois la macro pour coller a mon besoin est une grosse c...erie mais bon comme je débute je cherchouille en meme temps

en tout cas merci pour ton aide precieuse

thibaut

 

[Pascal76]

Bon je t'envoie ce que j'ai fait pour la ligne du titre 1

Mais là aujourd'hui j'ai pas plus de temps pour regarder l'optimisation du code et éviter de faire 26 fois le même. Car il va falloir aussi une gestion des noms de feuille (si la feuille existe déjà ça plantera).

On verra cela plus tard car aujourd'hui je ne pourrais plus rien faire

Pascal

 

[thibaut]

pascal
c'est deja super cool de ta part de me filer un coup de main et puis je peu aussi essayer de faire des choses en me plantant car c'est comme ça qu'on apprend

merci beaucoup

thibaut