[fr-users] Re: [fr-users] Re: [fr-users] [BasicVérifier l'état de cases à cocher
Merci... Ça avance ! Pour information, j'ai appelé le formulaire boutons. Il est sur la page recto et je peux le parcourir avec Xray avec ceci : Sub test Xray ThisComponent.Sheets.getByName("recto").DrawPage.Forms.getByName("boutons").getControlModels End Sub Je suis donc sur la voie ! -- Amicalement vOOotre Troumad Alias Bernard SIAUD mon site : http://troumad.org : AD maths WEB... Pour la liberté http://www.developpez.net/forums/f17/systemes/linux/ N'envoyez que des documents avec des formats ouverts, comme http://fr.libreoffice.org -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy
[fr-users] Re: [fr-users] [BasicVérifier l'état de cases à cocher
Bonjour Bernard, Le 31/03/2019 à 11:06, Bernard Siaud alias Troumad a écrit : Toujours dans mon document http://troumad.org/OOo/Feuille_Chronique.ods, j'ai des cases à cocher. J'aimerai vérifier leur état avec une marcro. Je cherche une macro qui cheke les checkbutton. Voici une fonction qui compte les cases à cochées à l'état coché sur un document Calc. Tu devras l'adapter pour ton besoin. (non testé) 8< -- Function _CheckBoxCount(pDoc As Object, pSheetName As String, pFormName As String) As Long 'pDoc : le document Calc 'pSheetName : le nom de la feuille à explorer 'pFormName : le nom du formulaire 'Renvoie le nombre de cases cochées, ou -1 si erreur (feuille ou formulaire inconnus) Dim oSheet As Object Dim oForm As Object Dim oControls As Object Dim oCurControl As Object Dim i As Long Dim l_Checked As Long l_Checked = -1 On Local Error Goto ErrHandler If pDoc.Sheets.hasByName(pSheetName) Then oSheet = pDoc.Sheets.getByName(pSheetName) oForm = oSheet.DrawPage.Forms.getByName(pFormName) If Not IsNull(oForm) Then l_Checked = 0 oControls = oForm.getControlModels For i = 0 To UBound(oControls) oCurControl = oControls(i) 'case à cocher ? If (oCurControl.ClassID = 5) Then 'cochée ? If (oCurControl.State = 1) Then l_Checked = l_Checked + 1 End If End If Next i End If End If ErrHandler: 'ne rien faire _CheckBoxCount = l_Checked End Function '_CheckBoxCount - >8 Bien cordialement, Si vous répondez, merci de penser à utiliser la fonction "répondre à tous" de votre logiciel de courrier électronique de façon que la liste reçoive une copie de votre réponse. Bien cordialement, Si vous répondez, merci de penser à utiliser la fonction "répondre à tous" de votre logiciel de courrier électronique de façon que la liste reçoive une copie de votre réponse. Bien cordialement, -- Jean-Francois Nifenecker, Bordeaux -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy
[fr-users] Re: [fr-users] [BasicVérifier l'état de cases à cocher
Bonjour Bernard L.O fait déjà une bonne partie du travail pour nous et coche des cases pour nous permettre de bien fonctionner. Nous a toujours l’option de personnaliser notre façon de travailler Par contre parfois il arrive qu’effectivement des cases ne sont pas cochées , il suffit de le faire nous même bonne journée jean Marius > Le 31 mars 2019 à 11:06, Bernard Siaud alias Troumad a > écrit : > > Bonjour > > Toujours dans mon document http://troumad.org/OOo/Feuille_Chronique.ods, j'ai > des cases à cocher. J'aimerai vérifier leur état avec une marcro. > > Je cherche une macro qui cheke les checkbutton. > > > Finalement, je ne vois pas comment agir sur les formulaires avec des macros. > Je regarde différentes doc et je ne trouve pas (la bonne ?). > > -- > Amicalement vOOotre Troumad Alias Bernard SIAUD > mon site : http://troumad.org : AD maths WEB... > Pour la liberté http://www.developpez.net/forums/f17/systemes/linux/ > N'envoyez que des documents avec des formats ouverts, comme > http://fr.libreoffice.org > > -- > Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire > Les archives de la liste sont disponibles à > https://listarchives.libreoffice.org/fr/users/ > Privacy Policy: https://www.documentfoundation.org/privacy > -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy
[fr-users] [BasicVérifier l'état de cases à cocher
Bonjour Toujours dans mon document http://troumad.org/OOo/Feuille_Chronique.ods, j'ai des cases à cocher. J'aimerai vérifier leur état avec une marcro. Je cherche une macro qui cheke les checkbutton. Finalement, je ne vois pas comment agir sur les formulaires avec des macros. Je regarde différentes doc et je ne trouve pas (la bonne ?). -- Amicalement vOOotre Troumad Alias Bernard SIAUD mon site : http://troumad.org : AD maths WEB... Pour la liberté http://www.developpez.net/forums/f17/systemes/linux/ N'envoyez que des documents avec des formats ouverts, comme http://fr.libreoffice.org -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy