Bonjour Youky,
je vais te donner des détails, mais je viens de voir qu'il y a un problème, mon tableau source (celui qui envoie les onglets) est protégé par une macro) ce qui a pour conséquence de bloquer l'export avec un message.
je pense qu'il va falloir ouvrir et fermer la protection.
merci de ton aide
c'est la misère
le msg
et la macro de protection
Sub Locked()
' Protection automatique de toutes les feuilles du classeur
Dim nombre As Integer
Dim Motdepasse As String
Motdepasse = InputBox("Entrer le mot de passe :", "Mettre la protection sur toutes les feuilles", "")
nombre = ActiveWorkbook.Sheets.Count
Application.ScreenUpdating = False
For i = 1 To nombre
Worksheets(i).Protect Password:="Tidf94"
Next i
End Sub
Sub Unlocked()
' Déprotection automatique de toutes les feuilles du classeur
Dim nombre As Integer
Dim Motdepasse As String
Motdepasse = InputBox("Entrer le mot de passe :", "Oter la protection de toutes les feuilles", "")
nombre = ActiveWorkbook.Sheets.Count
Application.ScreenUpdating = False
For i = 1 To nombre
Worksheets(i).Unprotect Password:="Tidf94"
Next i
End Sub
merci beaucoup !!