definition de nom de colonne

  • Initiateur de la discussion Initiateur de la discussion Profane
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Profane

XLDnaute Occasionnel
Bonjour a tous,
voila j'ai un soucis,
j'ai cré un tableau de 30 colonnes
et j'ai défini le nom de chaque colonne, pour me simplifier ulterieurement les formules
le hic c'est que j'ai du rajouter des lignes
et la ....mon référencement ne les prends pas en compte
y-a-t il un moyen simple de remodifier les références a ces colonnes ?
je ne peux pas les reselectionner toutes et redefinir ces memes entetes car certaines ont un entete partage (niveau présentation :whistle: )
j'espere que mon explication était claire

merci d'avance 😉
 
Salut,

Si tu rajoutes des lignes avant la dernière ligne de ton référencement, la matrice devrait normalmeent s'adapter automatiquement.
Quitte à devoir recopier cette dernière ligne ultérieurement au bon endroit.

Si cela ne va pas, mets un petit exemple en pièce jointe.

Â+
 
Ave,

''...je ne peux pas les reselectionner toutes et redefinir ces memes entetes car certaines ont un entete partage ...''

C'est pas du tout une bonne idée... Ne pas confondre stockage des données et présentation !

Si les données sont stockées ''correctement'' (les noms de champs en ligne 1, pas de lignes/colonnes vides...etc...)

Adapte le nom de la feuille (''BD'')

Sub DéfNoms()
Application.DisplayAlerts = False
With Sheets('BD')
For i = 1 To Application.CountA([BD!1:1])
.Range(.Range(.Cells(1, i), .Cells(65536, i).End(3)).Address).CreateNames Top:=True, Left:=False, Bottom:=False, Right:=False
Next
End With
Application.DisplayAlerts = True
End Sub

AV [aaa]
 
re bonjour,

j'ai pris la solution d'andré ,
la plus simple a mettre en oeuvre

je garde aussi sous le coude
la macro d'AV
qui m'aidera surement pour mes autres projets

je vous remercie tous les deux,
pour votre aimable contribution

cordialement
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

M
Réponses
2
Affichages
1 K
M
B
Réponses
5
Affichages
1 K
B
B
Réponses
0
Affichages
1 K
Bullrot
B
P
Réponses
8
Affichages
1 K
ptiot70
P
D
Réponses
8
Affichages
996
didinelfange
D
T
Réponses
10
Affichages
1 K
T
D
Réponses
8
Affichages
2 K
divad
D
Retour