Bonjour,
j'ai un soucis pour faire un copier coller d'une ligne en vba. Le but du code suivant est que si une date définit par la variable ligne est présente plusieurs fois, il coupe celle en t+2 et remplace celle en i. Je ne sais pas si c'est très clair.
While Workbooks("jour").Worksheets("DATA").Cells(i, 1) <> ""
If Mid(Workbooks("jour").Worksheets("data").Cells(i, 1), 1, 8) = Mid(ligne, 1, 8) Then
Workbooks("jour").Worksheets("data").Activate
Rows(t + 2).Cut
Rows(i).Paste
End If
i = i + 1
Wend
L'erreur est présente sur rows(i).paste, erreur 438 Propriété ou méthode non généré par cet objet.
Pourquoi cela?
Merci d'avance pour vos réponses.
Mickaël.
Configuration: Windows XP Internet Explorer 6.0