[VBA-E] Run-time error 1004, pourquoi ?

**Capsule** · 25/01/2007, 14h06

lors de la selection mise en rouge dans le code suivant, le message d'erreur suivant s'affiche:

Run-Time error '1004' Application-defined or object-defined error

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Windows("Model_SalesProdCcOb_2007.xls").Activate
        
        Sheets("CC").Select
        
        Sheets("CC").Columns("A:A").Select
        Selection.Find(What:=CountryName, After:=ActiveCell, kIn:=xlFormulas, 
             LookAt :=xlWhole, SearchOrder:=xlByRows,  
             SearchDirection:=xlNext, MatchCase:= True).Activate
        ActiveCell.Offset(0, 5).Range("A1:AL111").Select
        Selection.Copy
        
        ActiveWindow.ActivateNext
        
        Sheets("CC").Select
        
        Range("F698").Select
        Selection.PasteSpecial Paste:=xlValues, operation:=xlNone,   
                skipblanks:= True, Transpose:=False
        Application.CutCopyMode = False

la feuille CC est pourtant bien selectionnée... je ne comprend pas...

surtout que je fais exactement les mêmes opérations un peu plutot dans la macro mais avec d'autres ranges et feuille...

Qqn a-t-il une idée ?

Merci c'est assez urgent.....

Capsule