Renommer feuille avec nom du classeur sans extension de fichier

Résolu
HUGO BASS Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   -  
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Bonjour à toutes et tous,

Je voudrais pour plusieurs classeurs avec chacun un nom de fichier différent et contenant chacun une feuille nommée A, renommer la feuille A avec le nom du classeur la contenant sans l'extension du nom de fichier.
Ainsi par exemple la feuille A du classeur nommée : TOTO A SOIF 01 2014.xls deviendrais après exécution d'une macro :
TOTO A SOIF 01 2014

Merci
Cordialement
Hugues



A voir également:

4 réponses

Réponse 1 / 4
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonjour,

à tester : https://www.cjoint.com/?DJyszZ6zKty
Dans la boite tu peux sélectionner plusieurs fichiers avec la touche Ctrl+clic (ou clic sur le 1er et shift+clic sur le dernier pour en sélectionner une série)

eric
1
Réponse 2 / 4
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
Bonsoir

une seule ligne de macro devrait suffire
Sheets("A").Name = ThisWorkbook.Name

Cdlmnt
0
Réponse 3 / 4
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour,

essaies cette instruction dans ta macro

Activesheet.name= Split(ThisWorkbook.Name, ".")(0)
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Salut michel :-)

Ah oui, même pas pensé au split()
Mais bon, seulement s'il n'y a pas d'autres . dans les noms.
eric
0
Réponse 4 / 4
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Re,

Merci d'attendre 24h sans réponse avant de poster dans un autre forum :
https://www.developpez.net/forums/d1477505/logiciels/microsoft-office/excel/macros-vba-excel/renommer-nom-l-onglet-nom-classeur-l-extension-nom-fichier/

eric
0

Discussions similaires

"Nom de l'adresse" lors d'une inscription sur une site
ScarexStupid -
Rossignol -

9 réponses
Feuille de score belote
nulleeninfo -
brucine -

7 réponses