Discussion :

[Aurore497]

Bonjour à tous,

Voilà mon problème : j'ai 2 fichiers Excel (on va les appeler A et B pour simplifier...) qui sont issus d'une extraction de notre logiciel interne.
Il n'y a donc pas possibilité (à moins que je me trompe) de garder une mise en page ou formules sur un de ses 2 fichiers.
J'ai un numéro de matricule dans le fichier A mais pas le nom correspondant et dans le fichiers B j'ai le numéro de matricule et le nom correspondant.(A savoir que les infos les plus importantes sont dans le fichier A, vu qu'il ne manque que le nom des personnes).

Je souhaiterai trouver un moyen pour rassembler ses infos :
- soit avec un bouton de barre d'outil permettant d'insérer dans le fichier A les noms correspondant aux matricules
- soit créer un 3ème fichier et importer toutes les infos utiles.(j'avais pensé à RECHERCHEV mais je bloque....)

Si vous avez des idées et solutions, je suis preneuse....merci d'avance....

[Gorfael]

Salut Aurore497 et le forum
Plutôt que de faire une usine à gaz :
Copier la feuille du fichier B dans le fichier A
(deux fichiers ouverts, Clic-droit sur le nom de l'onglet=>Deplacer ou copier
Dans le classeur : A
Créer une copie : Cochée
tu fermes B
tu inseres une colonne en A
en A1 : =recherche(B1,'feuil de B'! A1:A65536;'feuil de B'! B1:B65536)
tu copie vers le bas
Une fois tout tes noms apparus tu fais un copir/collage special(valeur) de A sur A, pour figer les noms.
tu peux effacer la feuille copiée de B
A+

[Aurore497]

Merci beaucoup pour ta réponse...
Le recherchv ok c'est bon.
Par contre problème supplémentaire(je suis de passage dans la boite) : ce n'est pas moi qui vais utiliser ce fichier donc il faut que je trouve un système où mes collègues aient le moins de manip a faire....
tu vas me dire que ce n'est pas grand chose comme manip et je suis d'accord mais je t'assure que pour mes collègues ça parait le bout du monde!!ils ne maitrisent absolument pas excel....
Penses tu qu'on faire en sorte d'avoir tout ça en automatique via vb et un bouton de barre d'outil?

[Gorfael]

Salut Aurore497 et le forum
Pour faire une macro, tu lances une macro apprentissage
Menu Outils>>Macro>>Nouvelle macro
Tu fais les manips
tu arrêtes l'enregistrement. Tu retestes que la macro fait bien ce que tu veux, est tu nous mets le code dans un poste(avec le bouton modifier, tu passes directement sur la feuille de code), avec les valeurs à changer, en remplaçant par XXX les valeurs confidentielles.
A+

[Aurore497]

j'ai mis ça en place cette aprèm...(je crois que mon cerveau ne devait pas être allumé parce que j'aurai pu y penser avant!!rires)donc c'est ce que j'ai fait et ça marche!!!
Par contre là j'en profite juste : quelle est la syntaxe pour dire que tant que se n'est pas la dernière ligne, chercher les infos?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
While cell(i,1)<> ""
selection.autofill destination(??)
 
i = i+1
 
wend

[Gorfael]

Salut Aurore497 et le form
range("A" & rows.count).end(xlup) donne la prmière cellule non-vide en partant du bas et en remontant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[A1].autofill destination:=range([A2],range("A" & rows.count).end(xlup))

devrait remplir en copie incrémentielle de A1 les cellules de A2 à dernière non vide de A (code de tête, pas testé)
Pour parcourir une colonne, je préfère utiliser ce type de syntaxe, soit à travers
for x=1 to range("A" & rows.count).end(xlup).row
soit à travers
for each cel in range([A1],range("A" & rows.count).end(xlup))
A+

[Aurore497]

Merci beaucoup....j'ai finalement utilisé un truc du type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

for x=1 to range("A" & rows.count).end(xlup).row

et ça fonctionne


Merci pour ton aide