Copier 2 colonnes vers un autres classeur

Bonjours , voici mon code

Sub cours_historiques()

Workbooks.Open "http://real-chart.finance.yahoo.com/table.csv?s=ACA.PA&d=2&e=25&f=2015&g=d&a=11&b=14&c=2001&ignore=.csv"

' Macro1 Macro
    Windows("table").Activate
 [u] Range("A:A,E:E").Select[/u]     'ici il m'écrit  erreur execution 104 la methode range de l'objet a échoué'
    Range("E1").Activate
    Selection.Copy
    Windows("Classeur2.xltm").Activate
    Range("A1").Select
    ActiveSheet.Paste

    Range("C3").Formula = "=$B$2* B4/B3"
    Range("C3").AutoFill Destination:=Range("C3:C15864")    

End Sub

quelqu'un a une idée ?

Merci...

mdr j'avais pas vu ça s'est mal afficher...

voila le code

Bonjours , voici mon code

Sub cours_historiques()

Workbooks.Open "http://real-chart.finance.yahoo.com/table.csv?s=ACA.PA&d=2&e=25&f=2015&g=d&a=11&b=14&c=2001&ignore=.csv"

' Macro1 Macro
   Windows("table").Activate
   Range("A:A,E:E").Select   
   Range("E1").Activate
    Selection.Copy
    Windows("Classeur2.xltm").Activate
    Range("A1").Select
    ActiveSheet.Paste

    Range("C3").Formula = "=$B$2* B4/B3"
    Range("C3").AutoFill Destination:=Range("C3:C15864")    

End Sub

je veux donc selectionner la colonne A et E , mais à cette ligne il me met un message d'erreur "la methode Range de l'objet a échoué"

ça marchait tout à lh

Je n'ai plus le temps, souvent la réponse est dans le message d'erreur ou dans l'aide de ce message …

Si cela fonctionnait avant, c'est que le contexte a été modifié depuis …