Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

changer le nom des feuilles de façon automatique

D

DontWorry

Guest
Bonjour,
J'aimerais automatiser une procédure :
- mon fichier excel contient plusieurs feuilles, basées sur le même modèle.
- Chaque feuille porte un nom différent.
- Je voudrais qu'il y ait une macro ou un formulaire, où l'on entre tous les noms, et que la macro change automatiquement les noms de chaque feuille.

J'ai quelques notions de programmation, mais je ne connais pas trop le VBA avec Excel. Pourriez-vous m'aider ?
 

soft

XLDnaute Occasionnel
Salut DontWorry,

Tu peux utiliser la macro suivante :

Code:
Sub Nom_Feuille()
    For Each f In ActiveWorkbook.Sheets
        f.Name = InputBox('Nouveau nom', 'feuille : ' & f.Name, f.Name)
    Next f
End Sub
 
H

Hervé62

Guest
Salut
En meme tps que je t'ecrivais le petit pg , tu avais une reponse
Mais bon j'ai fini et te soumet une solution
Clique sur le bouton en feuille 'MAJ_feuil'
puis va voir le code, si cela te convient complete a ta facon

Hervé [file name=nom_feuil.zip size=9714]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/nom_feuil.zip[/file]
 

Pièces jointes

  • nom_feuil.zip
    9.5 KB · Affichages: 108

Discussions similaires

Réponses
3
Affichages
776
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…