Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionIndex = 1 Do If INdex > Workbooks("CA_formation.xls").Worksheets.Count then exit do if Workbooks("CA_formation.xls").Worksheets(INdex).Name = formation then Set ECP = Workbooks("CA_formation.xls").Worksheets(INdex) Exit do end if Index = Index + 1 Loop If INdex > Workbooks("CA_formation.xls").Worksheets.Count then set ECP = Workbooks("CA_formation.xls").Worksheets.add ECP.Name = Formation end if