[XL-2003] Rechercher puis remplacer plusieurs données [Résolu]

[dlight]

Bonjour à tous.

J'ai un tableau avec plusieurs colonnes dans lequel il y a les dons des donateurs. La colonne A contient le numéro du donateur.

Comme le donateur peut avoir fait plusieurs dons depuis le début de l'année, je cherche une façon de modifier l'adresse d'un donateur pour toutes les dons qu'il aurait pus avoir fait durant l'année afin de lui imprimer un reçu global à la fin de l'année.

J'ai donc créé un userform afin de permettre à l'utilisateur d'inscrire les nouvelles informations. Puis, ce userform transfert dans une feuille (Feuil1) les données au cellules E2 à I2.

J'avais pensé à ce code mais non:

Code :

1
2
3
4
5
6
7
8
Dim x As Range, y As String
y = [Client]
Set x = Sheets("Feuil1").Range("E2:I2")
 
Columns("A:A").Select
    Selection.Replace What:=y, Replacement:=x, LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

Quelqu'un peut me donner des idées ou références afin de m'aider à créer la fin de mon code?


Merci à l'avance


Dlight

[mercatog]

Bonsoir
Il serait judicieux de revoir la conception dans ton classeur avec:

• Dans une feuille, les données personnelles des donateurs
• Dans une autre feuille, les dons opérés.

Avec une clef unique (exemple IdDonateur qui lie les 2 feuilles)

Une simple RechercheV permet de reporter les données personnelles et en cas de changement de ces données, on les change en une seule place.

Sinon,
Utilise un filtre automatique sur la colonne A correspondant à ton donateur et procède au changement des lignes visibles.

[dlight]

Merci à vous mercatog.

Vos conseils ont été fructueux. J'ai finalement opté pour un do until afin de modifier mes données.

Dlight