Libre-infO.NET

[JLUC]

Hello Evrybody,

J'ai une macro dans laquelle je mets le resultat d'un rapport dans un fichier PDF, je n'ai pas besoir de voir le résultat, surtout que mes macros tournent la nuit.

Si j'utilise 'Set objImpApp = GetObject("CognosImpromptu.Application") ' je dois laisser ouvert Cognos , si j'utilise 'Set objImpApp = CreateObject("CognosImpromptu.Application") ', Cognos s'ouvre automatiquement, et mes rapports tournent. Seulement je ne connais l'instruction pour fermer Cognos, de ce fait si j'ai 10 macros, le matin il y a 10 fenêtres Cognos d'ouvertes.

SVP, est-ce quelqu'un connait l'instruction qui permet de fermer Cognos en fin de Macro ?


Merci

JLuc

[Lilienette]

Bonjour,

Je ne te garantis rien, mais en VBA, ça se passe comme ça:

Dim ExcelSheet As Object
Set ExcelSheet = CreateObject("Excel.Sheet")
ExcelSheet.Application.Visible = True ' permet de rendre visible
ExcelSheet.Application.Quit ' ferme Excel
[b:b03b0cf2da]Set ExcelSheet = Nothing[/b:b03b0cf2da]

Dans tous les cas, la dernière ligne est indispensable: quand tu crées un objet, il faut toujours le 'vider' à la fin. Je pense qu'en mettant seulement cette ligne, ça doit refermer l'application. A toi d'essayer...

Aurélie

[JLUC]

Merci Aurélie,

je viens trouvé également :

[b:98ab725017]objImpApp.quit[/b:98ab725017]


ça marche aussi.