[XL-2003] Copier coller avec des conditions [Résolu]

[steph8]

Bonjour à tous,

Je suis débutant et bloque depuis ce matin sur ma premiere tentative de VBA. En esperant que vous pourriez m'aider.

J'ai un classeur contenant 2 feuilles,
Dans la feuille1 j'ai un tableau avec x colonne qui repertorie des projets (colonnes: date de création, chef de projet, date de mise en prod, cout du projet .. etc), il contient la colonne ID (A) qui associe un numéro à chque projet. Et j'ai une colonne (D) vide que je dois completer.
Dans une deuxième feuille j'ai un autre tableau avec les informations manquantes: une colonne ID et une colonne (B) qui contient les info que je dois copier ds la colonne (D) de la feuille 1... j'espere que vous me suivez toujours!
Le problème c'est que dans la premiere feuille tous les projets sont recensé mais pas ds la deuxième donc je ne peux pas faire un bête copier/coller.

Voila mon code qui ne marche pas:

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Sub cherche()
 
      'J'identifie les projets identiques dans les 2 feuilles
x = 1
For Each n In Sheet("data_fin").[a1:a370]
If n = Sheet("list_po").Cells(x, 1) Then
 
      'Je copie colle les colonnes
Sheet("data_fin").Cells(n, 2) = Sheet("list_po").Cells(x, 25)
End If
x = x + 1
Next
 
End Sub

Lorsque je compile, excel surligne Public Sub cherche() et affiche: erreur de compilation, sub ou fonction non défini...



En vous remerciant d'avance de votre aide !!!

[Pierre Fauconnier]

Salut.

Penser Excel avant de penser VBA...

Comment ferais-tu en Excel? Tu utiliserais probablement RECHERCHEV pour compléter la colonne D... Non?

Fais de même en VBA.

Crée la formule RECHERCHEV en VBA et colle-là sur la plage souhaitée. Eventuellement, réalise un copier/coller spécial valeurs si tu souhaites ne garder que les valeurs.


De plus, toujours dans l'optique d'utiliser Excel comme ressource au sein de VBA (Si bien sûr ton classeur doit être pérenne), tu gagneras encore en clarté en nommant tes plages car tu pérenniseras ton code en déléguant à Excel le travail de délimiter tes plages ...

Tu iras plus vite, ton code fonctionnera mieux...

[steph8]

En effet... VBA non nécessaire, merci !