[Résolu] [Base] Choix ouverture formulaire

Discussions et questions sur tout ce qui concerne la programmation tous langages et tous modules confondus.

Modérateur: Vilains modOOs

Règles du forum
:alerte: Balisage obligatoire dans cette section !
Aidez-nous à vous aider au mieux en balisant correctement votre question : reportez-vous sur les règles de cette section avant de poster !

[Résolu] [Base] Choix ouverture formulaire

Messagepar xeres » 07 Mai 2013 07:44

Bonjour à tous, je voudrais créer un bouton "action" qui ouvrirai un formulaire en fonction d'un paramètre (nom du formulaire) choisi sur une case à cocher ou bouton radio.

j'ai essayé ce code :
Code : Tout sélectionner   AgrandirRéduire
Sub boutonouvrir
Dim Case1 as string, Case2 as string
' Case1 et Case2 sont deux cases à cocher
if Case1=1 then ThisDatabaseDocument.FormDocuments.getByName("FormDos").open else msgbox "non cochée"
end sub



mais ça marche pas ....

Help !!
Dernière édition par xeres le 07 Mai 2013 12:09, édité 2 fois.
libreoffice 5.1.6.2 sous windows 10
xeres
Membre lOOyal
Membre lOOyal
 
Message(s) : 41
Inscrit le : 10 Avr 2013 12:02

Re: [Base] Choix ouverture formulaire

Messagepar Dude » 07 Mai 2013 09:03

Salut,

Déjà, on facilite la lecture et la compréhension pour les bénévoles qui te consacrent du temps.
  1. en balisant correctement ton code :
    Code : Tout sélectionner   AgrandirRéduire
    Du code bien balisé est plus lisible
  2. en fournissant un fichier accompagné de ta macro afin que l'on ait une base de travail

xeres a écrit:mais ça marche pas ....

Partant de cette phrase qui ne veut rien dire, je vois ceci :
Code : Tout sélectionner   AgrandirRéduire
' Case1 et Case2 sont deux cases à cocher
if Case1=1 then

Ce n'est bien sûr pas comme ça que l'on récupère une case à cocher.
Mon conseil :
  1. Utilise XRay pour voir les propriétés du contrôle que tu utilises
  2. Fais un minimum de recherche dans ce forum car ce genre de question a déjà fait l'objet de moults fils.
Exemple : viewtopic.php?f=8&t=37271&hilit=r%C3%A9cup%2A+case%2A+cocher
Avatar de l’utilisateur
Dude
Grand Maître de l'OOffice
Grand Maître de l'OOffice
 
Message(s) : 20929
Inscrit le : 03 Mars 2006 08:45
Localisation : 127.0.0.1

Re: [Base] Choix ouverture formulaire

Messagepar Piaf » 07 Mai 2013 09:49

Bonjour
Un petit exemple vite fait en utilisant un groupe d'options.
Sub OuvertureFormChoix(oEv as Object)
Code : Tout sélectionner   AgrandirRéduire
Dim NomForm as String
   If oEv.Source.Model.State = 1 Then NomForm = oEv.Source.Model.Label
   openform(NomForm)
End Sub
A+
Pièces jointes
copie de BilansKinés(2).odb
(83.72 Kio) Téléchargé 43 fois
Libre Office Version: 6.1.6 et Apache OpenOffice 4.1.6 Sur Xubuntu 18.04 AMD64
Piaf
GourOOu
GourOOu
 
Message(s) : 5622
Inscrit le : 25 Nov 2011 19:07
Localisation : Guyane

Re: [Base] Choix ouverture formulaire

Messagepar xeres » 07 Mai 2013 10:08

Merci Piaf,
c'est ce que je cherchais. Je vais essayé de comprendre et reproduire la manipulation.

Pour Dude,
merci de tes commentaires, je suis une vrai bille en basic (formation sur le tas....), je comprends pas grand chose aux termes basic et procède par essai-erreur.
Bien evidemment XRAy est inconnu pour moi.
Je fais des efforts !!!

Merci à vous
libreoffice 5.1.6.2 sous windows 10
xeres
Membre lOOyal
Membre lOOyal
 
Message(s) : 41
Inscrit le : 10 Avr 2013 12:02

Re: [Base] Choix ouverture formulaire

Messagepar Piaf » 07 Mai 2013 11:50

Re
Un peu d'explications :
  • oEv est l’événement qui a déclenché la macro.
  • Source est le contrôle qui déclenche l'événement.
  • Model est le modèle de ce contrôle.
  • State est l'état du contrôle, s'il est égal à 1, cela veut dire qu'il est coché (0 non coché).
  • Label est l'étiquette du contrôle.
Comme l'étiquette porte le nom du formulaire à ouvrir, on le passe en référence pour ouvrir le formulaire.

Tu devrais installer Xray, c'est un outil indispensable, il n'écrira pas le code à ta place mais te permet de voir de quelles méthodes ou propriétés tu disposes sur ton objet.
A+
Libre Office Version: 6.1.6 et Apache OpenOffice 4.1.6 Sur Xubuntu 18.04 AMD64
Piaf
GourOOu
GourOOu
 
Message(s) : 5622
Inscrit le : 25 Nov 2011 19:07
Localisation : Guyane

Re: [Base] Choix ouverture formulaire

Messagepar xeres » 07 Mai 2013 12:08

Merci pour tous ces renseignements.

je mets le fil en Résolu
libreoffice 5.1.6.2 sous windows 10
xeres
Membre lOOyal
Membre lOOyal
 
Message(s) : 41
Inscrit le : 10 Avr 2013 12:02


Retour vers Macros et API

Qui est en ligne ?

Utilisateur(s) parcourant ce forum : Beetle et 3 invité(s)