Mise a jour Prix

Bonjour a tous

Voila je suis en train de créer un fichier pour gestion de bar d'un club de pétanque ce que je cherche a faire est simple pour ceux qui sont des pros de VBA mais pour moi je donne ma langue au chat cela fait un mois que je bute sur le problème je voudrais mettre a jour le prix des articles d'une reserve pour cela j'ai créé une fiche nommé mise a Jour Prix que je lance avec un userform ce qui marche bien mais voila je ne sais pas comment faire passer le nouveau prix dans la feuille BdBase qui représente le fichier base article il me copie le résultat que sur la première ligne de ma base alors que je voudrais qu'il me recherche la ligne correspondante a l'article que je dois mettre a jour voila le code .
Pour information je suis débutant et je n'y connais pas grand chose

Sheets("Mise a Jour Prix").Activate
Maplage = Range("F8").Select
Selection.Copy
Sheets("BdBase").Select
Range("Maplage").Select

Maplage = Range("F8").Select
Set [Maplage] = Cells.Find(What:=[Maplage], After:=ActivCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False

Sheets("Mise a Jour Prix").Select
Range("A1").Select

Merci a vous pour toute aide.
jojo67200