Paste sous XL 2003
Bonjour à tous
Nouveau sur le forum, un bonjour à toutes et tous.
Ma question :
Le code de macro suivant fonctionne sous excel 2000, pas sous excel 2003 : une idée ?
Cells.Select ' recup des resultats qui m'interessent (filtrage)
Selection.Columns.AutoFit
Rows("1:1").Select
Application.CutCopyMode = False
Selection.AutoFilter
Selection.AutoFilter Field:=2, Criteria1:="<>"
Selection.AutoFilter Field:=14, Criteria1:="<>"
Cells.Select ' recopie sur une nouvelle feuille
Range("A1").Activate
Application.CutCopyMode = False
Selection.Copy
Sheets("Feuil2").Select
Sheets("Feuil2").Activate ' ceinture et bretelles !
ActiveSheet.Paste <-------------------- plante Erreur d'exécution '1004'
La méthode Paste de la Classe Worksheet a échoué.
Pour info : Feuil2 est visible.
J'ai essayé aussi Cells.Select dans Feuil2 avant le paste, etc.
Pas possible ce connaître à l'avance le Range à copier/coller (contient des cellules vides + nombre de lignes et colonnes variables)
Des questions complémentaires ou des idées ?
Merci d'avance et bonne journée à tout le monde.
Cordialement,
Bonjour,
Au cas où ça pourrait aider d'autres
... j'ai l'impression que sous XL2003, le code erreur renvoyé traite
1) le succès du collage (on voit les cellules)
2) + d'autres choses (cohérence des formats de cellules ou je ne sais pas quoi)
Alors que le 2) n'influençait pas le code retour dans XL2000.
mais ce n'est qu'une impression
Pour l'instant, passage en force, car ma macro fonctionne sous XL2000 :
On Error Resume Next
........Paste
On Error Goto 0
Bonne journée à tous