Bonjour le forum
Voila plusieurs jours que je cherche un moyen de copier l'ensemble d'un classeur dans un autre mais en conservant les liaisons entre les feuilles, tenir compte d'une possible modification des noms et de d'inclure les feuilles cachées.
J'avais trouvé sur le forum plusieurs méthodes pour les copier mais le transfert étant feuille par feuille les liaisons restaient sur l'ancien classeur.
et ben voilà, j'ai trouvé
Sub Mise_a_jour()
On Error Resume Next
Workbooks(1).Activate
Application.DisplayAlerts = False
Sheets.Copy Before:=Workbooks(2).Sheets(1) 'copy toutes les feuilles cachées ou non dans le classeur
maj.Delete 'suppression de la feuille unique
Application.DisplayAlerts = True
End Sub
Cordialement
Voila plusieurs jours que je cherche un moyen de copier l'ensemble d'un classeur dans un autre mais en conservant les liaisons entre les feuilles, tenir compte d'une possible modification des noms et de d'inclure les feuilles cachées.
J'avais trouvé sur le forum plusieurs méthodes pour les copier mais le transfert étant feuille par feuille les liaisons restaient sur l'ancien classeur.
et ben voilà, j'ai trouvé
Sub Mise_a_jour()
On Error Resume Next
Workbooks(1).Activate
Application.DisplayAlerts = False
Sheets.Copy Before:=Workbooks(2).Sheets(1) 'copy toutes les feuilles cachées ou non dans le classeur
maj.Delete 'suppression de la feuille unique
Application.DisplayAlerts = True
End Sub
Cordialement
