renvoi liste par combobox

[jtitin]

bonjour à tous

aprés une sélection dans combobox je cherche à revoyer la sélection d'une liste dans une plage de cellule
je met un fichier joint pour meilleure compréhention

merci pour votre aide

 

[porcinet82]

Re : renvoi liste par combobox

Salut,

C'est peut etre faisable par formule, mais voici une macro a placer dans le module de la feuille concernée (ca fonctionne pour ton fichier tel quel, donc qui dit modif, dit adaptation...):

Private Sub ComboBox1_Change()
Dim j%
For j = 5 To 8 'colonne E à H
    If Cells(2, j).Value = Cells(4, 3).Value Then 'test si le numéro (ligne2) est égal à la valeur de la cellule C4
        Range(Cells(3, j), Cells(6, j)).Copy Destination:=Range("B7:B10") 'Copie de la liste
        Exit Sub
    End If
Next j
End Sub

@+

 

[BOISGONTIER]

Re : renvoi liste par combobox

Bonjour,

-Sélectionner B7:B10
=INDEX(E3:H6;;C4)
-Valider avec Maj+ctrl+entrée

JB
Formation Excel VBA JB

 

[jtitin]

Re : renvoi liste par combobox

merci pour ta réponse Porcinet82

mais quelqu'un peut m'aiguiller sur une formule

merci encore

 

[jtitin]

Re : renvoi liste par combobox

Hop pas vue la réponse de BOISGONTIER

merci c'est super

 

[gilbert_RGI]

Re : renvoi liste par combobox

Bonjour

peut-être comme ceci

 

[CB60]

Re : renvoi liste par combobox

Bonjour
Cela doit fonctionné??

=DECALER((E3);;EQUIV(DROITE($C$2;1)*1;$E$2:$H$2;0)-1;)

à mettre en B7 et tirer vers le bas