XL 2019 Pointer vers un autre fichier excel

[Olypemmy]

Bonjour à tous
J'ai une macro très intéressante que l'on m'a développé sur un autre post mais j'ai quelques améliorations à y apporter.
Actuellement un bouton prend les données sur une feuille pour les archiver dans un tableau sur une autre dans le même fichier / classeur.
Je souhaiterai modifier cette dernière partie pour l'envoyer dans un autre fichier situé ailleurs sur le réseau ....
Je vous mets la macro en question :

Sub Archivage()
With Sheets("Historique_BC")
For L = 1 To 5
If Cells(L + 5, "D") <> "" Then
DL = .Range("A65500").End(xlUp).Row + 1
.Cells(DL, "A") = [A14]
.Cells(DL, "B") = [A2]
.Cells(DL, "C") = Cells(L + 5, "A")
.Cells(DL, "D") = Cells(L + 5, "B")
.Cells(DL, "E") = Cells(L + 5, "C")
.Cells(DL, "F") = Cells(L + 5, "D")
End If
Next L
End With
[A610].ClearContents: [A13] = "": [A2] = [A2] + 1
End Sub

La partie en bleu soulignée est celle que je souhaite modifier pour pointer sur l'autre fichier.
Merci à tous

 

[sylvanu]

Bonsoir Olypemmy,

Est ce que la solution dans ce post vous satisfait ?

XL 2016 - Macro - Sauter une étape si cellule vide

Bonjour, Je n'y connais absolument en macro, en vba et autre grandespossibilités sur excel ... je maitrise tout juste certaines formules un peu élaborées mais là j'ai vraiment besoin d'aide ! J'ai un fichier avec 2 feuilles, la premiere contient un genre de formulaire que je renseigne en...

www.excel-downloads.com

 

[Olypemmy]

Bonsoir Olypemmy,

Est ce que la solution dans ce post vous satisfait ?

XL 2016 - Macro - Sauter une étape si cellule vide

Bonjour, Je n'y connais absolument en macro, en vba et autre grandespossibilités sur excel ... je maitrise tout juste certaines formules un peu élaborées mais là j'ai vraiment besoin d'aide ! J'ai un fichier avec 2 feuilles, la premiere contient un genre de formulaire que je renseigne en...

www.excel-downloads.com

Oui partiellement car le fichier destination sera partagé par 4 personnes, il faudra etre patient et attendre son tour ...