Récuper la valeur de plisieurs céllules se trouvant dans une liste

vgendron

XLDnaute Barbatruc

• 22 Août 2014

• #2

Re : Récuper la valeur de plisieurs céllules se trouvant dans une liste

Bonjour Geely,

Avec une simple formule

Dans ton onglet Pierre par exemple, dans la cellule E6
=INDEX(LDate;EQUIV(D3;LNom;0);1)

avec LDate la zone nommée range E8:E22 de la feuille Liste
avec LNom la zone nommée range A8:A22 de la feuille Liste

 

Vote positif 0 Vote négatif

Geely

XLDnaute Occasionnel

• 22 Août 2014

• #3

Re : Récuper la valeur de plisieurs céllules se trouvant dans une liste

Bonjour vgendron

Impeccable, merci. C'est en fait plus simple qu'une solution avec macor

Geely

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 22 Août 2014

• #4

Re : Récuper la valeur de plisieurs céllules se trouvant dans une liste

Bonjour, Geely, vgendron, le Forum,

Une autre solution, par macro.

Code:

Option Explicit
Sub MAJ_dates()
    Dim o As Worksheet
    For Each o In Worksheets
        If o.Name <> "Liste" Then
            With o.Range("E6")
                .FormulaR1C1 = "=VLOOKUP(R[-3]C[-1],Liste!R[1]C[-4]:R[16]C,5,0)"
                .NumberFormat = "ddd dd mm yyyy"
            End With
        End If
    Next
End Sub

A bientôt

 

Vote positif 0 Vote négatif

Geely

XLDnaute Occasionnel

• 23 Août 2014

• #5

Re : Récuper la valeur de plisieurs céllules se trouvant dans une liste

Bonjour Doublezero

Super ta solution avec la macro, c'est peut être plus efficace si l'on a de longues listes de noms.

Geely

 

Vote positif 0 Vote négatif