Code vba nommer colonne et passer à la suivante

Résolu
CHARLYJACK Messages postés 345 Date d'inscription   Statut Membre Dernière intervention   -  
Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je souhaite mettre en place des listes déroulantes en cascade ( ça c'est bon )
par contre les liste à préparer sont volumineuses.

J'ai besoin d'un code qui nomme une selection dans une colonne et dont le nom est la premiere cellule. (ex
Puis on pas à la suivante, je pense que c'est un systeme de compteur mais je ne suis pas très bon en vba.

ex selection B1:B50 que je nomme avec le contenu de B1 puis je passe à C1:C50

Merci de vos pistes, de vos réponses

4 réponses

  1. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Bonjour

    Un exemple à adapter

    Const F = "Feuil1"
    Const codeb = 2
    Const cofin = 6
    Const linom = 1
    Const lifin = 5
    
    Sub NommerPlages()
    Dim co As Long, nom As String, adr As String
    For co = codeb To cofin
      nom = Sheets(F).Cells(linom, co)
      adr = Sheets(F).Range(Cells(linom, co), Cells(lifin, co)).Address
      ActiveWorkbook.Names.Add Name:=nom, RefersTo:=adr
    Next co
    End Sub

    Cdlmnt
    1
    1. CHARLYJACK Messages postés 345 Date d'inscription   Statut Membre Dernière intervention   1
       
      Merci beaucoup
      j'essaie de suite et je reviens vers toi
      0
    2. CHARLYJACK Messages postés 345 Date d'inscription   Statut Membre Dernière intervention   1
       
      Super

      ça fonctionne très bien
      merci à toi et bon weekend
      0
    3. CHARLYJACK Messages postés 345 Date d'inscription   Statut Membre Dernière intervention   1
       
      Bonsoir
      au final j'ai un gros probleme les noms ne sont pas reconnus quand je fais mes filtres, je suis obligé de rajouter le nom de la feuille à la mano sur la selection.
      De plus tous les codes ne sont pas pris alors qu'ils passent quand on enregistre à la main.
      merci quand même
      0
    4. Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   1 478
       
      Bonjour CHARLYJACK,
      Excuser l'intrusion, mais vous dites quoi de la proposition d' eriiic juste au-dessous.... ?
      Salutations
      Le Pingou
      0
    5. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      Bonjour,

      Je crois que j'écris à l'encre sympathique parfois.
      Pas sympa...
      eric
      0
  2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    Une macro que j'avais faite pour créer des noms dynamiques (la plage s'étend automatiquement si tu complètes tes listes)
    Avec des options pour mettre des noms valides (remplacer les caractères interdits et mettre à jour ou non le titre de la colonne etc) et des options de nettoyage ou tris des listes.
    Il suffit de sélectionner les colonnes de tes listes et lancer la macro
    https://www.cjoint.com/c/EGzi0RrDNjI

    eric
    1
    1. CHARLYJACK Messages postés 345 Date d'inscription   Statut Membre Dernière intervention   1
       
      Bonjour Eric
      Merci pour cette macro,
      elle ouvre des perspectives très intéressantes et comme c'est pour le boulot !
      Merci beaucoup
      0
  3. Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    Bonjour eriiic,
    Surement pas car je l'ai vue et sans les binocles.
    Par contre la manière de répondre comme commentaire au lieu du Répondre au sujet à tendance à faire tomber les bonne choses en fin de parcours comme des exclu ..., ou plus personne ne regarde !
    Amicales salutations
    Le Pingou

    0
    1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      Ca me paraissait justifié à partir du moment où c'était une autre proposition et non un complément à celle en cours.
      Sinon ce bouton ne devrait servir qu'une fois à la 1ère réponse ou alors si on décide de répondre à coté de la question ;-)

      J'ai quand même été voir son historique, ce n'est pas un habitué de la chose, attendons.
      En plus il faut 3 ans d'entrainement pour réussir à suivre un sujet ici...
      Par contre ccm91 s'est pris un -1, je remet à 0

      eric
      0
  4. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Salut Eric

    Merci d'avoir remis le compteur à zéro. Bon, c'est vrai que parfois, on s'efforce de répondre à la question mais on a tendance à négliger celles qui n'ont pas été posées.
    Au prochain voyage, mets moi un -10 que je retrouve mon petit sud ouest ;-)
    Sinon, comme dit Le Pingou, ta proposition est bien visible et fait le tour (complet) du sujet, je me la suis mise à gauche.

    En plus il faut 3 ans d'entrainement pour réussir à suivre un sujet ici...
    Tout à fait d'accord, cette notion de commentaire a une fâcheuse tendance à créer des sacs de noeuds.
    J'hésite à te mettre un +1, du moins pour le moment, ça va placer ta solution en début de discussion, et le demandeur risque bien cette fois, de passer à côté.

    Bonne soirée
    0
    1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      Je ne peux que -2, pas assez de pouvoir. Et puis ça ferait pareil que si tu m'avais mis +1 ;-)
      Ils devraient attendre 15 jours avant de passer du tri par date en tri par note. Avec ce système les nouveaux sont sûrs de s'y perdre...
      Bonne soirée à tous.
      eric

      PS: ahhhh, je viens de voir où tu voulais le -10 :-) Faudra que je pense à me faire greffer des doigts.
      0
    2. Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   1 478
       
      Bonsoir eriiic,
      A nous deux on pourrait aller à -2 ....!
      salutations à ccm81 au passage.

      A la prochaine.
      Amicales salutations
      Le Pingou
      0