Renommer un onglet comme un autre classeur

[didinelfange]

Bonjour le forum,

Je viens vous demander de l'aide car j'ai besoin de renommer un onglet recopié d'un autre fichier avec le nom du "dit-fichier". Par exemple, j'ai un fichier qui s'appelle "extract_10.10.2016.xls" dans lequel j'ai un second onglet qui s'appelle "tableau récap". Dans un autre classeur, je recopie par macro cet onglet que j'aimerais renommer "10.10.2016" soit le nom du fichier sans "extract" et sans ".xls".
Je vous joins un bout de ma macro qui m'a servi à copier les données .

Je vous remercie d'avance pour votre petit coup de pouce.

 

[Staple1600]

Bonsoir à tous

Rouen, son Mont Riboudet, la Saint-Romain...euh pardon m'égare (mais je fus rouennais jadis)

Pour ta question , tu peux t'inspirer de ceci

Sub a()
Dim Nom$, X$
Nom = "extract_10.10.2016.xls"
X = Split(Nom, "_")(1)
MsgBox Left(X, Len(X) - 4)
End Sub

 

[didinelfange]

Bonjour le forum,
Staple1600, je te remercie pour ta réponse rapide, mais le problème c'est que ce fichier sera utilisé par des gens non experts en informatique. et comme ces extractions sont à faire tous les mois, il faut que l'onglet soit automatiquement renommé (l'onglet n'aura donc jamais la même date car ce fichier consiste à observer les différences entre deux extractions mensuelles)
Afin de mieux comprendre comment fonctionne le fichier, je vous joins une capture d'écran du dossier dans lequel je vais chercher mes extractions (qui ne sont pas faites le même jour que le fichier de comparaison )
Lorsque j'ouvre le fichier de comparaison, il me demande d'ouvrir le fichier du mois précédent, puis celui du mois en cours. Il copie ensuite l'onglet 2 de chaque extraction sur le fichier de comparaison et c'est à ce moment là que je souhaiterais qu'il se renomme automatiquement.

Je vous remercie par avance de votre aide.

 

[didinelfange]

Re-bonjour à tous,

Je vous remercie pour votre aide ma macro marche parfaitement .