IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

VBA Validation des données avec liste liée à plage variable


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau membre du Club
    Homme Profil pro
    BI
    Inscrit en
    Mars 2019
    Messages
    30
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : BI

    Informations forums :
    Inscription : Mars 2019
    Messages : 30
    Points : 28
    Points
    28
    Par défaut VBA Validation des données avec liste liée à plage variable
    Hello le forum,

    J'essaye de faire une liste de validation de données qui depend d'une plage variable.

    Donc je sélectionne mon range

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
        Dim QuotList As Range
     
            Range("L5").Select
            Range(Selection, Selection.End(xlDown)).Select
            MsgBox (Selection.Address)
            Set QuotList = Range(Selection.Address)
    Puis j'essaye d'appliquer cette sélection pour la liste des valeurs en C9 :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
                   Range("C9").Select
            With Selection.Validation
            .Delete
            .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
            xlBetween, Formula1:="=QuotList"
            .IgnoreBlank = False
            .InCellDropdown = True
            .InputTitle = ""
            .ErrorTitle = ""
            .InputMessage = ""
            .ErrorMessage = ""
            .ShowInput = True
            .ShowError = True
     
        End With
    J'ai essayé pleins de variantes trouvées sur le net mais je n'y arrive pas.

    Quelqu'un aurait-il une idée ?

    Merci d'avance

  2. #2
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    12 773
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 12 773
    Points : 28 637
    Points
    28 637
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    Il existe les tableaux structurés qui permettent de créer des listes dynamiques.
    Il est donc préférable de les utiliser en lieu et place de plages de cellules classiques, ce qui permet de faire abstraction de propriétés CurrentRegion, End(xlDown), etc.
    Il est évidemment possible de faire référence à ces listes sans passer par le VBA

    A lire éventuellement
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

Discussions similaires

  1. Réponses: 2
    Dernier message: 23/11/2016, 04h12
  2. Réponses: 4
    Dernier message: 20/02/2015, 09h25
  3. Validation des données avec SSIS
    Par mehdiyou1985 dans le forum SSIS
    Réponses: 4
    Dernier message: 07/01/2015, 15h58
  4. Réponses: 5
    Dernier message: 06/12/2007, 22h16
  5. Validation des données par liste
    Par Niagala dans le forum Excel
    Réponses: 4
    Dernier message: 10/11/2007, 10h11

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo