End
Dim F as Form For each F in Forms Unload F Next
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionDim app_con As Excel.Application Dim classeur_con As Excel.Workbook Dim feuille_con As Excel.Worksheet Set app_con = CreateObject("Excel.application") Set classeur_con = app_con.Workbooks.Open(Path_con) Set feuille_con = app_con.Sheets(1) app_con.ActiveWorkbook.Save Set feuille_con = Nothing classeur_con.Close savechanges = False Set classeur_con = Nothing app_con.Quit Set app_con = Nothing
Rangesans spécifier l'objet feuille qui y était associée :) .