Bonjour,

Voici mon problème :

Je souhaite effectuer un test sur les cellules de la colonne A du classeur "tableau de pilotage".
Je veux que la macro détermine la ligne à laquelle la valeur d'une cellule dans la colonne A du classeur "tableau de pilotage" correspond à la valeur de la cellule fusionnée "CU2 : DN2" du classeur "FCA_xxx" (le nom du fichier est variable) et copie une ligne spécifique dans le classeur "FCA_xxx" et la colle à la place de la ligne correspondante dans le classeur "tableau de pilotage"

Voici mon morceau de code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
Sub MAJ()
 
ActiveWorkbook.Sheets("Synthèse").Select
If UCase(Range("n10")) = 0 Then     'cas pour 0 action (dans la suite du code je copie 1,2 3,4 ou 5 lignes selon le nombre d'actions)
Range("A10:X10").Select
selection.Copy
Workbooks.Open Filename:= _
        "\\chemin\Tableau de Pilotage FCA.xls"
 
ActiveWorkbook.Sheets("Tableau de suivi").Select
Range("A3").Select
While ActiveCell <> ThisWorkbook.Sheets("Modèle").Range("CU2:DN2")
 
ActiveCell.Offset(1, 0).Select
 
Wend
selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
ActiveWorkbook.Save
ActiveWorkbook.Close
End If
...
J'ai remarqué en faisant un tour sur le forum qu'il était déconseillé d'utiliser la fonction selection.copy mais à vrai dire je suis débutant en VBA et ne sais pas comment m'en passer !

Merci d'avance pour l'aide que vous pourriez m'apporter !

Feldenn