Copie de ligne d'un classeur à un autre

Bonsoir,

Je vais essayer d’être clair dans mon explication.

J'aimerais alimenter la "feuil2" du fichier BASE avec le contenu des feuilles "test1" et "test2" du fichier TEST.

Concrètement, une macro me crée un lien hypertexte sur la "feuil1" du fichier BASE à chaque fois qu'il trouve un mot identique aux onglets du fichier TEST. J'aimerais lorsque je clic sur un lien hypertexte, que les lignes 1 à 5 de la feuille ouverte se copie dans la "feuil2" du fichier BASE. Si je clique sur le lien hypertexte suivant, les lignes 1 à 5 de la nouvelle feuille se copie à la suite de la "feuil2" en ligne 6-10 ... ainsi de suite.

Je vous ai mis le résultat souhaité dans le fichier BASE en feuil2.

Merci de votre aide.

17base.xlsx (10.26 Ko)
20test.xlsx (9.24 Ko)

pouvez-vous m'aider ? ou me dire si je ne suis pas clair

bonsoir,

voici, un code à mettre dans base, alt-f11 selectionner sheet1 et coller

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
With ThisWorkbook.Worksheets("sheet2")
 derlig = .Range("b" & Rows.Count).End(xlUp).Row
 If derlig > 1 Then derlig = derlig + 1
 Workbooks(Target.Address).Worksheets(Target.Name).Range("A1:E5").Copy Destination:=.Range("A" & derlig & ":E" & derlig + 4)
End With
End Sub

parfait, un grand merci pour ton aide

Rechercher des sujets similaires à "copie ligne classeur"