Methode paste de l'objet wrorksheet a echoue

Le 12/02/2015 à 08:15

Bonjour,

Lorsque je lance une macro, elle s'arrête a un moment donné et me dit :

erreur d'exécution 2147417848 (80010108)

la méthode "paste" de l'objet worsheet a échoué

Comment puis-je faire pour résoudre ce problème.

Merci de votre aide

Bonne journée

Le 12/02/2015 à 08:32

Bonjour,

Comment résoudre !?

En nous fournissant le code pour commencer

Le 12/02/2015 à 08:36

la macro est très longue voici l'extrait

Windows("BASE FACTURE CLIENT A UTILISER.xlsx").Activate

ActiveWindow.ScrollWorkbookTabs Position:=xlFirst

Sheets("BASE FAC").Select

Cells.Select

Selection.Copy

ActiveWindow.ScrollWorkbookTabs Position:=xlLast

Sheets("CORACARREFOUR").Select

Cells.Select

Range("A1").Select

ActiveSheet.Paste Ici le problème

Columns("I:J").Select

Application.CutCopyMode = False

Selection.Delete Shift:=xlToLeft

ActiveWorkbook.Worksheets("CORACARREFOUR").AutoFilter.Sort.SortFields.Clear

ActiveWorkbook.Worksheets("CORACARREFOUR").AutoFilter.Sort.SortFields.Add Key _

:=Range("C1:C5000"), SortOn:=xlSortOnValues, Order:=xlAscending, _

DataOption:=xlSortNormal

With ActiveWorkbook.Worksheets("CORACARREFOUR").AutoFilter.Sort

.Header = xlYes

.MatchCase = False

.Orientation = xlTopToBottom

.SortMethod = xlPinYin

.Apply

End With

Merci

Le 12/02/2015 à 08:54

Re,

Essaye avec ça

  Windows("BASE FACTURE CLIENT A UTILISER.xlsx").Activate
  ActiveWorkbook.Sheets("BASE FAC").Cells.Copy Destination:= _
                                Sheets("CORACARREFOUR").Range("A1")
  'ActiveSheet.Paste Ici le problème
  With ActiveWorkbook.Sheets("CORACARREFOUR")
    .Columns("I:J").Delete Shift:=xlToLeft
    .AutoFilter.Sort.SortFields.Clear
    .AutoFilter.Sort.SortFields.Add Key:=Range("C1:C5000"), SortOn:=xlSortOnValues, _
                                    Order:=xlAscending, DataOption:=xlSortNormal
    .AutoFilter.Sort
    .Header = xlYes
    .MatchCase = False
    .Orientation = xlTopToBottom
    .SortMethod = xlPinYin
    .Apply
  End With

A+

Le 12/02/2015 à 09:34

Merci

mais j'ai maintenant le problème suivant :

erreur automation

l'objet invoqué s'est déconnecté de ses clients

Merci

Le 12/02/2015 à 15:24

Re,

L'erreur vient du code que je t'ai donné !?

Car chez moi ça marche parfaitement

Le 13/02/2015 à 06:12