Dévelopement sur VBA sous Excel

Bonjour, je viens de m'inscrire et je suis stagiare pour l'instant je suis complètement paumé. Je vais poser ma question et on verra par la suite. J'ai un fichier " Outil de la surveillance " qui tourne sous VBA /Excel 2007. je tiens à vous dire que mon motivation et ma détermination pour réussir ce stage me tiens beaucoup à cœur, cependant j’ai besoin d’une pouce, au fait le projet est reparti sur deux grandes phase :
- Intervenu ou modifier régulièrement sur un outil « outil de la surveillance de GMAO » programmé sur Vba sous Excel qui est déjà sur place.
.
Pour « l’outil de la surveillance » la problématique est sous deux aspects :
C’est un outil qui consiste à faire « la comparaison » deux fichiers nommés « GMAO » et Rapport006 »
- Le premier thème est d’ajouter de faire remonter sur la liste de « outil de la surveillance » la date du Butée.
Ainsi j’ai ajouté sur le Marco une ligne supplémentaire dans la feuille 15 (V01) :

Code:

---

1 2 3 4 5

Range("U8").Select ActiveCell.FormulaR1C1 = _ "=IF(ISERROR(VLOOKUP(RC[-20],'Interventions GMAO'!C[-20]:C[-4],13,FALSE)),"""",VLOOKUP(RC[-20],'Interventions GMAO'!C[-20]:C[-4],13,FALSE))" Range("U8").Select Selection.AutoFill Destination:=Range("U8:U" & nbligne)

---

et une équation pour

Code:

---

=SI(ESTERREUR(RECHERCHEV(A8;'Interventions GMAO'!A:Q;13;FAUX));"";RECHERCHEV(A8;'Interventions GMAO'!A:Q;13;FAUX))

---

Je suis arrivé quand à insérer le « le butée » par contre je ne peux plus recharger sur la « liste des surveillances » un autre « Rapport006 » et « Interventions GMAO » pour « lancer la surveillance » dans V01, V02, V03.
- Toujours dans cette problématique après avoir lancé le « Rapport 006 » et GMAO pour effectuer la comparaison «la surveillance » le but est d’afficher sous V01 ou V02 ou V03 les « les Identiques » et « les Différences » or le seul les « les Identiques » sont affichés.
Je dois trouver sur les macros pour effectuer la modification.
Je vous ferais par les les fichiers initiale et celui avec lequel j’ai intervenu
Merci dans l'attente d'une réponse.
bien cordialement

Bonjour
La première partie de ma problématique est résolue, alors comment faire la comparaison pour les deux fichiers chaque qu’on veut apparu à la fois et les « Identité » et la « conformité »
Je rappelle que la comparaison est effectuée voir code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Sub Etat_veille_01()   Sheets("V01").Select Range("A8:U100000").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select Selection.ClearContents Range("A8").Select   j = 8 For i = 1 To 100000 If Application.Worksheets("Rapport O06").Range("B" & i).Value = "Confirmé / Initialisé" Then Application.Worksheets("V01").Range("A" & j & ":L" & j).Value = Application.Worksheets("Rapport O06").Range("A" & i & ":L" & i).Value j = j + 1 End If Next i     End Sub

---

Cordialement