Error 1004

[Temjeh]

Error 1004 ...merci résolue

Bonjour

Depuis 2 hrs j'ai un bug dans une loope
Il me met error 1004 select classe range a échoué alors que mon code est bon!!!!!!!!

...
For n = 1 To Range("A65000").End(xlUp).Row + 1

...
Windows("Cherche.xls").Activate
Sheets("Tous_NPV").Activate
Range("A65000").End(xlUp).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Windows("Cherche_NPV.xls").Activate
End If

Next n

Merci je ne sais pas pourquoi mais en mettant dans une macro ca fonctionne

Sub Macro1()
Range("A65000").End(xlUp).Offset(1, 0).Select
End Sub

Merci beaucoup pour votre aide et vos idées

Temjeh

 

[MichelXld]

Re : Error 1004

bonsoir cher Temjeh

as tu fait un essai en précisant le nom de la feuille

Sheets("Tous_NPV").Activate
Sheets("Tous_NPV").Range("A65000").End(xlUp).Offset(1, 0).Select

bonne soiree
Ce lien n'existe plus

 

[Temjeh]

Re : Error 1004

Merci Michel tu a viser dans le mille!!!!!!!!!!!!!

Je trouvais cela bizzarre que séparémment ca fonctionnait

merci infiniement

Temjeh