Jean Sympa a écrit :
Bonjour à toutes et à tous
[Prog] Modifier la Macro QuitterForm
12 Septembre 2010
J'ai trois formulaires : Menu, Famille et Fleur.
j'ouvre successivement Menu -- Famille - Fleur
Je voudrais, au moyen d'un bouton, Fermer Fleur et Famille sans afficher
Famille
Je modifie la macro QuitterForm. J'ai une erreur. Que faire?
Macro originale ---------------------------------
Cette macro doit marcher si elle est stocké dans le formulaire sinon je
ne vois pas ce qu'elle ferme (ou alors elle ferme tout OOo)
Sub QuitterForm
oFrame = thisComponent.CurrentController.getFrame()
oFrame.close( True )
End Sub
Macro modifiée '
---------------------------------------------------------------------
Sub QuitterFleur
Dim i As integer
i=2
While i > 0
oFrame = thisComponent.CurrentController.getFrame() ' *Erreur
d'exécution*
Je n'en suis pas sûr mais,
je crois que la méthode ne s'écrit pas GetFrame() mais GetFrames() c'est
un peu comme une collection que tu utiliserai en VBA
Tu devra certainement rajouter un test sur le nom du formulaire et ne
pas te limiter à 2 (il faut toutes les parcourir) car tu va lister
toutes les fenêtres OOo ouvertes et il ne faut pas fermer n'importe
qu'elle fenêtre d'OOo surtout.
oFrame.close( True )
i= i-1
Wend
End Sub
Avec mes remerciements
Papy
Samuel Mounier
---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org
