Validation de donnée

Bonjour,

Y aurait il quelqu'un qui pourrait m'aider, svp.

Mon problème est le suivant:
j'aimerais faire une validation de donnée liste (pour cela pas de soucis), cependant mon problème est que ma validation de donnée liste serait en rapport avec des onglets (c'est là que je n'y arrive pas).

Mon deuxième soucis est que j'aimerais faire une foncition index sur une feuille mais qui aurait rapport avec la validation liste.

Je me permet de joindre ce fichier, afin de vous expliquer mon problème plus correctement.

http://www.cijoint.fr/cjlink.php?file=cj200912/cijFMdBh4q.xlsm

En vous remerciant énormément à l'avance.
Configuration: Windows XP Internet Explorer 6.0

10 réponses

  1. Bonjour,

    merci michel, pour un combobox je c'est en réaliser, je me demander si j'aurais su éliminer les lignes vierges aussi comme que m'afficher aider par la validation de donnée.

    Bonne journée
    1. Contributeur
      ce n'est pas pour un combobox mais pour une liste à validation de données classique comme indiqué
      à la place de "=fournisseurs" que tu avais marqué
      1. Bonsoir,

        Tous marche parfaitement

        Une bête question

        j'ai mis la formule que tu m'avais donné pour la validation de donnée
        =DECALER(Fournisseurs;0;0;NBVAL(Fournisseurs);1)

        dans un combobox, mais rien ne s'affiche

        est ce que je dois l'écrire différemment

        En te remerciant
        1. Contributeur
          tu relances simplement la macro mais ajoute une ligne

          Sub fournisseurs()
          Dim nbre As Byte, cptr As Byte
          nbre = ThisWorkbook.Sheets.Count
          range("fournisseurs").clearcontents
          For cptr = 3 To nbre
              Sheets("recherche").Cells(cptr - 1, 11) = Sheets(cptr).Name
          Next

          End Sub
          1. Bonjour,

            C'est cool encore merci
            et pour le verre pas de soucis, je tiens toujours mes promesses.

            je travail sur ton premier aide

            serait il possible grace à ton code ou je récupérer les onglets de:

            si je supprime un onglet qu'il me supprime le nom en colonne k

            Merci
            1. Contributeur
              Re,

              a copier coller dans "source" de ta validation de données
              =DECALER(Fournisseurs;0;0;NBVAL(Fournisseurs);1)


              Bonne soirée et à 1 de ces 4 à Liège!
              1. Bonjour,

                T'es un chef, ça marche nickel

                si tu passe dans la région de liège, fais un signe, ont boiras un bon verre.

                encore merci.

                Sans abuser, une bête question

                Est ce possible d'avoir seulement les lignes remplies dans ma validation de donnée.
                Je m'explique
                quand tu va dans la validation de donnée, la liste déroulante s'affiche et me marque tous. j'aimerais que celle-ci ne m'affiche que les lignes ou il y a des informations et pas les lignes vide.

                En te remerciant

                J'espère que ce fichier ira pour toi

                http://www.cijoint.fr/cjlink.php?file=cj200912/cijDLe8f02.xlsx
                1. Contributeur
                  Re,

                  Je m'attendais un peu à ta question!

                  Par formule en B4 à tirer vers le bas
                  =SI(A4="";"";RECHERCHEV(A4;INDIRECT("'"&B$2&"'!A$2:B$1000");2;0))

                  Si tu veux en VBA, Merci de me communiquer ton classeur enregistré en .xls: je n'ai pas 2007
                  1. Bonjour Michel,

                    Je te remercie pour tes informations.

                    Grace à toi, j'arrive à résoudre mon premier problème.

                    Pourrais-tu m'aider pour mon dernier problème.
                    J'aimerais après validation d'un fournisseur, grace à la fonction index récupérer les informations du fournisseur choisis dans la colonne B en rapport avec les produits de la colonne A

                    Je te remet une pièce jointe avec les modifications

                    http://www.cijoint.fr/cjlink.php?file=cj200912/cijoDpgy23.xlsm
                    1. Contributeur
                      Bonjour

                      cette macro inscrit le nom des onglets fournisseurs dans la colonne K de la feuille recherche

                      Sub fournisseurs()
                      Dim nbre As Byte, cptr As Byte
                      nbre = ThisWorkbook.Sheets.Count
                      For cptr = 3 To nbre
                          Sheets("recherche").Cells(cptr - 1, 11) = Sheets(cptr).Name
                      Next
                      End Sub