Re,
ActiveSheet.ListObjects("T_Tableau_export_BDN_").Name = _
"T_Tableau_export_BDN_calculs"
Activesheet : nous sommes à cette ligne du code dans l'onglet 6_Export_BDN_digere
Dans cet onglet ni dans aucun autre le tableau T_Tableau_export_BDN_ existe. D'où le bug...
Il y a bien un tableau T_Tableau_export_BDN (mais le tiret bas à la fin) mais il se trouve dans l'onget 3_Export_brut_BDN
Soit ton code devient :
Worksheets("3_Export_brut_BDN").ListObjects("T_Tableau_export_BDN").Name = _
"T_Tableau_export_BDN_calculs"
Soit tu supprimes cette ligne...