hemardjean
XLDnaute Occasionnel
Bonjour le forum
Nouveau problème à laquelle je cherche auprès de vous une solution.
j’ai un classeur avec 32 dossiers nommé « copie transfert lot 1,2,3,4 … » lié avec 32 dossiers nommés « lot 1,2,3,4…. »
le premier sert à copier/coller des bordereaux fournisseurs que nous recevons.
J’ai lié le deuxième avec le premier par des liaisons simples mais il faut les réactualiser à chaque fois lors de l’ouverture du deuxième, dans celui-ci il y a aussi des formules qu’il ne faut pas écraser et j’ai ajouté une macro pour automatiser le nom des onglets liés avec la cellule C4.
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("C4") <> "" Then ActiveSheet.Name = Range("C4")
End Sub.
Ma question peut-on faire que le deuxième classeur se met à jour de façon plus simple sans écraser les formules ?
Je vous joins un dossier.
Merci de votre aide.
Bien cordialement.
Nouveau problème à laquelle je cherche auprès de vous une solution.
j’ai un classeur avec 32 dossiers nommé « copie transfert lot 1,2,3,4 … » lié avec 32 dossiers nommés « lot 1,2,3,4…. »
le premier sert à copier/coller des bordereaux fournisseurs que nous recevons.
J’ai lié le deuxième avec le premier par des liaisons simples mais il faut les réactualiser à chaque fois lors de l’ouverture du deuxième, dans celui-ci il y a aussi des formules qu’il ne faut pas écraser et j’ai ajouté une macro pour automatiser le nom des onglets liés avec la cellule C4.
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("C4") <> "" Then ActiveSheet.Name = Range("C4")
End Sub.
Ma question peut-on faire que le deuxième classeur se met à jour de façon plus simple sans écraser les formules ?
Je vous joins un dossier.
Merci de votre aide.
Bien cordialement.