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

XL 2013 variable dans RefersToR1C1:

  • Initiateur de la discussion Initiateur de la discussion fridak
  • 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 !

fridak

XLDnaute Nouveau
Bonjour,
J'ai écrit le code suivant pour affecter le nom contenu dans la cellule B1 à la plage B2:B7.

nomfr = Cells(2, 1)
Range(Cells(2, 2), Cells(2, 7)).Select
Application.CutCopyMode = False
ActiveWorkbook.Names.Add Name:=nomfr, RefersToR1C1:="=dropdown!R2C2:R7C2"

Il marche. Je voudrais maintenant le mettre dans une boucle sur le numéro de la colonne

For x = 2 To N
nomfr = Cells(x, 1)
Range(Cells(x, 2), Cells(x, 7)).Select
Application.CutCopyMode = False
ActiveWorkbook.Names.Add Name:=nomfr, RefersToR1C1:="=dropdown!R2Cx:R7Cx"
Next x

Je ne sais pas comment écrire le contenu de RefersToR1C1 avec la variable x à l'intérieur. Merci d'avance de votre aide.
 
Bonsoir fridak, bienvenue sur XLD, salut Bruno,

Autre solution :
VB:
Application.CutCopyMode = False
With Sheets("dropdown")
    For x = 2 To N
        .Cells(2, x).Resize(6).Name = Cells(x, 1) 'plage nommée
    Next x
End With
Nota : en VBA les Select sont inutiles voire nuisibles.

A+
 
- 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

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