Bonjour,
j'ai fait une macro qui créé des onglets à partir d'une liste de nom. Mon problème c'est qu'arrivé au 39ème, ca bug en me disant 'la méthode copie de la classe worksheet a échoué'
Je vous mets un bout de la macro en vous remerciant de m'aider. J'ai essayer sur un autre poste en me disant que c'est peut etre un problème de memoire mais non, ça bug au même endroit. De plus je suis loin d'avoir atteint le nombre maxi d'onglet qui de 256 il me semble, bref je suis perdu...
....
For onglet = 1 To NombreOnglet
Sheets("champs de référence" ).Select
NomAgent = Cells(LigneAgent, 17).Value
Sheets("Feuille_modele" ).Select
Sheets("Feuille_modele" ).Copy Before:=Sheets(1) <--- ca bug ici !
ActiveSheet.Name = NomAgent
'récupération des données de l'agent Matricule
Sheets(NomAgent).Cells(2, 3).Value = Sheets("Champs de référence" ).Cells(LigneAgent, 16).Value
....
Bonne journée
Fred