Pour générer directement des PDFs à partir de Excel.
SI fFichierExiste(fRepExe()+"\"+"MacroSpecialisee.xlsm") ALORS MonExcel est un objet Automation dynamique MonExcel = ObjetActif("Excel.Application") // Si un Excel est déjà lancé, on va le récupérer SI MonExcel = Null ALORS // Aucun Excel n'est déjà lancé : on en lance un MonExcel = allouer un objet Automation "Excel.Application" SI MonExcel = Null ALORS Erreur("Impossible de lancer Excel") RETOUR FIN FIN SI MonExcel <> Null ALORS // Pilotage d'Excel //rend la feuille visible pour débugage sinon ça tourne en arrière plan MonExcel>>Visible = Vrai MonExcel>>Workbooks>>open(fRepExe()+"\"+"MacroSpecialisee.xlsm") // Lancer la macro particulière avec paramètres éventuels MonExcel>>run(“NomDeMaMacro_Dans_MacroSpecialisee”, sParametre1) MonExcel>>quit // On libère l'objet Excel utilisé libérer MonExcel FIN SINON Erreur("Impossible de générer automatiquement le fichier XLS et PDF concerné. Macro 'MacroSpecialisee.xlsm' non trouvée.", "Faites le manuellement si nécessaire.") FIN