ribotb a écrit :
Bonjour.
Pour ouvrir un formulaire B à parir d'un formulaire A j'utilise cette
macro que j'avais trouvée sur le forum :
REM ***** BASIC *****
' ouverture des formulaires
' se fait par appel d'une fonction
Function OpenForm( formContainer as variant, oConnection as variant,
sFormName as string, optional strMode as string ) as variant
Dim aProp(1) As New com.sun.star.beans.PropertyValue
dim openMode as string
if ismissing( strMode ) then
openMode = "open"
else
openMode = strMode
endif
aProp(0).Name = "ActiveConnection"
aProp(0).Value = oConnection
aProp(1).Name = "OpenMode"
aProp(1).Value = strMode
OpenForm =
formContainer.loadComponentFromURL(sFormName,"_blank",0,aProp())
End Function
Sub onClickOuvrirxxxxxxxx( oEvent as variant )
OpenForm(
OEvent.Source.Model.Parent.ActiveConnection.Parent.DatabaseDocument.FormDocuments,
OEvent.Source.Model.Parent.ActiveConnection, "xxxxxxxxx")
end sub
xxxxxxxx est le nom du formulaire B à ouvrir
autant de sun-end sub que de formulaires B à ouvrir
Cette macro une fois installée doit être associée au bouton dans le
formulaire A qui doit lancer le formulaire B.
missviou a écrit :
Bonsoir tout le monde,
A force de lire vos différents échanges et recommandations, je me
suis attaquée aux bases de données et je crois avoir fait un truc
sympa qui me permet toute une gestion par le biais de formulaires
avec tout ce qui en découle derrière (Tables, Requêtes, formules...)
et vous en remercie encore, je vous dois beaucoup... Mais, je cale
sur un truc qui pour vous doit être plus que banal.
Je voudrais associer à un bouton, à la fin de mon formulaire,
l'ouverture d'un document bien précis. Je pensais donc le faire par
le biais d'une macro pour l'associer à mon bouton, mais ça je ne
sais pas faire....
Merci pour votre aide et vous souhaite une bonne fin de we.
missviou
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
Merci c'est sympa, je vais tester.
Tu crois que ça va fonctionner même si je désire ouvrir un document
"writer" et non un formulaire ?
slt
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
