Bonjour,

J'aurais besoin de vous pour résoudre mon code VBA pour la méthode PasteSpecial...
Chaque fois j'ai l'erreur 1004.
Ci-dessous le code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
    col = 21
For i = 2 To 71
    num = Range("AP" & i).Value
    If num >= 6 Then Range("Y" & i).Copy
    Range("W" & col).PasteSpecial Operation:=xlNone
    col = col + 1
Next i
Merci d'avance de votre aide