bon alors j'ai un peu modifié le bazar pour que la macro copie carrément la nouvelle page dans l'ancien classeur
je trouvais ça plus simple
alors je n'ai aucun message d'enregistrement mais par contre ça ne fait rien dans le calsseur destination (??)
j'ai enregistré cette macro dans thisworkbook à l'évènement before_close
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.EnableEvents = False
'chemin ou se trouve le fichier B
chemin = "C:\"
'nom du fichier B
fichier = "nom.xlsm"
If Dir(chemin & fichier) = "" Then Exit Sub
'définir le classeur source
Set classeurSource = ActiveWorkbook
'définir le classeur destination
Set classeurdestination = Application.Workbooks.Open(chemin & fichier, , True)
'copier les données de la "corr" du classeur source vers la "corr" du classeur destination
classeurSource.Sheets("corr").Range("A2:F9999").Copy Destination:=classeurdestination.Sheets("corr").Range("A1")
'fermer le classeur destination sans message
Application.DisplayAlerts = False
classeurdestination.Save
Application.DisplayAlerts = True
classeurdestination.Close
End Sub
on voit bien que la macro effectue un truc en plus mais manifestement ce n'est pas la copie .....
merci
il se passe un truc étrange en faisant le pas à pas
le d=classeur destination nom.xslm s'ouvre bien , mais il est bizarre j'ai pas de barre Fichier, insertion etcetc , juste le tableau
la page corr est bien modifée (ajout du nouveau range )
mais il ne se sauve pas
quand je l'ouvre la page corr n'est pas modifiée
merci encore