Recupération donnée d'un autre fichier Excel

Bonjour je vous demande une nouvelle fois de l'aide.

J'aimerai une macro qui me permette de récupérer des analyses qui sortent d'un autre fichier (LAB2008) que je transfère dans mon fichier analyse automa. Or j'aimerai aussi que cette macro ne m'affiche que les analyses du jour ( non traité) et non celles déjà traité la veille.

J'ai essayé cette macro mais elle ne marche pas

Sub Etincelle()

Workbooks.Open Filename:= _

"U:\LAB2008.xls"

Windows("LAB2008.xls").Activate

Range("A369:AS369").Select

Selection.Copy

Workbooks("LAB2008.xls").Close

Workbooks("analyse automa.xls").Activate

Worksheets("Feuil1").Activate

Range("E13").Select

ActiveSheet.Paste

End Sub

Je ne vois vraiment pas comment poursuivre! Pouvez vous m'aider. Je mets en PJ le fichier que j'aimerai copier.

Merci beaucoup pour votre aide tres cordialement

Bonjour,

A essayer :

Sub Etincelle()
    Dim ld%, lf%, d, tbl
    With Workbooks.Open("U:\LAB2008.xls").Worksheets(1)
        lf = .Range("B" & .Rows.Count).End(xlUp).Row
        d = Int(.Range("B" & lf)): ld = lf
        Do While Int(.Range("B" & ld - 1)) = d
            ld = ld - 1
        Loop
        tbl = .Range("A" & ld & ":AS" & lf).Value
    End With
    Workbooks("analyse automa.xls").Worksheets("Feuil1").Range("E13") _
     .Resize(lf - ld + 1, 45).Value = tbl
    Workbooks("LAB2008.xls").Close False
End Sub

Recherche la dernière date dans le classeur LAB2008.xls, et rapatrie toutes les lignes de cette date.

Il faudrait peut-être éventuellement supprimer des données antérieures dans le classeur analyse... (il vaut mieux connaître la configuration de la feuille pour le coder )

Cordialement.

Merci beaucoup pour ta réactivité.

Malheureusement la macro à un soucis avec un code d'erreur 9. J'ai essayer de mettre paste mais tout se passe comme si il n'arrivait pas à reconnaitre le fichier destinataire. Je te joints le fichier en PJ.

Merci beaucoup pour ton aide en tout cas

Les seules possibilités d'erreur 9 résident dans les noms de fichiers ou feuille... Il suffit de vérifier, vu que je les ai pris dans ton code préexistant !

Et je note que ton fichier destinaire dénommé en ....xls est en fait en ....xlsm !

Cordialement.

Nb- Un module avec 100 macros est préférable à 100 modules avec 1 macro !!!

Effectivement c'est toujours les pluspetites choses auxquelles penser que l'on oublie

Merci beaucoup pour ton aide et tout ça me permet de mieux maitriser excel