Besoin d'aide

[magnumspy]

Bonjour,

Ci-joint une partie du fichier que je construit. Il est composé de 2 feuilles
Analyse où je souhaite obtenir le centre de coût de la personne
Extraction, qui sont les données SAP
Dans cette dernière, la colonne A contient le nom de la personne et la B le centre de coût

La difficulté est que le nom n'apparait pas forcément au même endroit (au milieu ou à la fin de la cellule), comme le contenu (loc vehic, loc janvier)
A noter que le centre de coûts ne change pas en cours d'année

Par exemple, si la colonne A contient Mathieu, je veux qu'apparaisse C3600 dans la feuille Analyse à côté de Mathieu

PPouvez-vous m'aider?
Merci beaucoup par avance

 

[Cousinhub]

Re : Besoin d'aide

Bonjour,

avec un code VBA (Alt + F11 pour lire le code)

Clique sur le bouton jaune..

Le code :

Sub centre()
Dim Cel As Range 'Déclaration de la variable
For Each Cel In Range("A2:A" & [A65000].End(xlUp).Row) 'pour chaque cellule de A2
                                                        'à la dernière cellule de
                                                        'la colonne A
    With Sheets("extraction SAP")                       'Avec la feuille d'extraction
        Set c = .Columns(1).Find(Cel.Value, LookAt:=xlPart) 'on cherche le nom dans la
                                                        'colonne 1
        If Not c Is Nothing Then Cel.Offset(, 1).Value = c.Offset(, 1).Value
                    'si on l'a trouvé, on copie le centre dans la cellule
                    'à droite du nom
    End With
Next Cel 'suivante!
End Sub

le fichier :

 

[Jocelyn]

Re : Besoin d'aide

Bonjour le Forum,
Bonjour magnumspy, bhbh,

une autre solution par formules matricielle bien que le VBA fonctionne parfaitement 😉

pour valider une formule matricielle il faut la valider en appuyant simultanément sur les touches CTRL, Majuscule (au dessus de CTRL) et entrée

Si tu as bien validé la formule les signes {et} vont apparaitre devant le signe = et en fin de formule

Jocelyn

 

[magnumspy]

Re : Besoin d'aide

Bonjour,

Merci à vous 2 , en priorité je vais prendre la version VBA et je vais tester la forme Matricielle.

@+

 

[CISCO]

Re : Besoin d'aide

Bonjour

Sans traitement des messages d'erreur, en B2 :
=RECHERCHEV("*"&A2&"*";'extraction SAP'!A$2:B$20;2;FAUX)

@ plus