Renomer plusieur feuille excel en fonction de divers cellule de la premiere
ArnaudLudmann
-
cs_Le Pivert Messages postés 7904 Date d'inscription Statut Contributeur Dernière intervention -
cs_Le Pivert Messages postés 7904 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je souhaiterais pouvoir renomer des feuilles de mon classeur en fonction de plusieur cellule remplie sur la premiere.
En claire sur ma premiere feuille je remplie un tableau d'entreprise, et je voudrais qu'une des feuilles suivante ce renome en fonction ce nom dans mon premier tableau.
en esperant avoir etait claire,
Merci d'avance,
Bien cordialement,
Je souhaiterais pouvoir renomer des feuilles de mon classeur en fonction de plusieur cellule remplie sur la premiere.
En claire sur ma premiere feuille je remplie un tableau d'entreprise, et je voudrais qu'une des feuilles suivante ce renome en fonction ce nom dans mon premier tableau.
en esperant avoir etait claire,
Merci d'avance,
Bien cordialement,
Configuration: Windows / Chrome 77.0.3865.75
A voir également:
- Renommer toutes les feuilles d'un classeur excel
- Liste déroulante excel - Guide
- Renommer des fichiers en masse - Guide
- Word et excel gratuit - Guide
- Trier un tableau excel - Guide
- Fusionner feuilles excel - Guide
3 réponses
Bonjour,
tu peux faire cela en vba.
Si tu veux renommer une seule feuille (la suivante). Tu fait Alt F11 sur ta feuille où se trouve le nom dans ton premier tableau. Tu colles ce code dans le module de ta feuille.
.
Cela se déclenchera au double clic sur la cellule A1 à adapter
voir ceci pour plus d'info
https://silkyroad.developpez.com/VBA/FeuilleDeCalcul/#LI
Par contre si tu veux renommer plusieurs feuilles en même temps, c'est une autre approche!
tu peux faire cela en vba.
Si tu veux renommer une seule feuille (la suivante). Tu fait Alt F11 sur ta feuille où se trouve le nom dans ton premier tableau. Tu colles ce code dans le module de ta feuille.
.
Cela se déclenchera au double clic sur la cellule A1 à adapter
Option Explicit
'https://silkyroad.developpez.com/VBA/FeuilleDeCalcul/
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim position As Integer
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then 'adapter la cellule
If Target.Value = "" Then Exit Sub
position = ActiveSheet.Index
Worksheets(position + 1).Name = Target.Value
End If
End Sub
voir ceci pour plus d'info
https://silkyroad.developpez.com/VBA/FeuilleDeCalcul/#LI
Par contre si tu veux renommer plusieurs feuilles en même temps, c'est une autre approche!
Bonsoire,
Merci de votre retour, c'est une bonne piste que vous m'avez fournis malgré tous je n'arrive pas a tous adapter a mon cas.
Je m'explique :
j'ai sur ma premiere feuille de calcul un tableau avec divers entreprise. Pour faciliter l'explication ont va dire qu'elles ce trouvent respectivement en position A1 A2 etr A3.
Ce dont j'ai besoin c'est que quand les Nom inscris en A1 A2 et A3 renome respectivement les feuilles de calcul 2, 3 et 4.
Et de preference sans devoir effectuer une manipulation ( le fichier etant destiné à des néofite de l'informatique).
Merci d'avance et bonne soirée.
Merci de votre retour, c'est une bonne piste que vous m'avez fournis malgré tous je n'arrive pas a tous adapter a mon cas.
Je m'explique :
j'ai sur ma premiere feuille de calcul un tableau avec divers entreprise. Pour faciliter l'explication ont va dire qu'elles ce trouvent respectivement en position A1 A2 etr A3.
Ce dont j'ai besoin c'est que quand les Nom inscris en A1 A2 et A3 renome respectivement les feuilles de calcul 2, 3 et 4.
Et de preference sans devoir effectuer une manipulation ( le fichier etant destiné à des néofite de l'informatique).
Merci d'avance et bonne soirée.