Personnellement, à la place de ton number_Tab, j'utiliserai plutôt xlBook.Worksheets.Count, c'est plus fiable.
Une autre erreur qu'il vaut mieux éviter, c'est de donner un nom de variable commençant par "xl" : c'est le préfixe utilisé par les constantes VBA de Excel. Il n'est pas impossible que xlBook existe déjà comme constante.
Pour ce qui est de ton problème, est-ce que tu as essayé de faire avancer ton programme pas à pas en regardant le contenu de tes variables (WorkBk et xlSheet) juste avant la copie et que le fichier source est effectivement ouvert ?
Ou de remplacer ta ligne Copy par :
WorkBk.Sheets(1).Copy After:=xlBook.Worksheets(xlBook.Worksheets.Count)
Partager