Bonjour,

je souhaite déplacer une selection, pour cela j'ai code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
 WsListes.Range("A" & (intNoLigneContrat + 1) & ":D" & intDerniereLigne).Select
                Selection.Cut
                Selection.Offset(-1, 0).Activate
                Selection.PasteSpecial
                Application.CutCopyMode = False
mais cela bug au niveau Selection.PasteSpecial, l'erreur est que la méthode pastepecial de l'objet Range a échoué

Une idée?

Merci d'avance

Nath