IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

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


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Novembre 2009
    Messages
    322
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Novembre 2009
    Messages : 322
    Par défaut Rechercher puis remplacer plusieurs données
    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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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

  2. #2
    Expert éminent Avatar de mercatog
    Homme Profil pro
    Inscrit en
    Juillet 2008
    Messages
    9 435
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations forums :
    Inscription : Juillet 2008
    Messages : 9 435
    Par défaut
    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.

  3. #3
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Novembre 2009
    Messages
    322
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Novembre 2009
    Messages : 322
    Par défaut Re
    Merci à vous mercatog.

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

    Dlight

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. rechercher et remplacer un caractere dans une base de données
    Par trialrofr dans le forum Requêtes et SQL.
    Réponses: 4
    Dernier message: 29/01/2009, 10h07
  2. Réponses: 4
    Dernier message: 23/01/2008, 14h08
  3. [RegEx] remplacer des données dans plusieurs fichiers
    Par sam01 dans le forum Langage
    Réponses: 3
    Dernier message: 11/12/2007, 14h03
  4. Réponses: 24
    Dernier message: 09/07/2007, 13h08
  5. [RegEx] Rechercher et remplacer plusieurs occurences avec expression
    Par nabab dans le forum Langage
    Réponses: 2
    Dernier message: 12/12/2005, 17h12

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo