

![]() | Start a set with this search |
![]() | Include this search in one of my sets |
![]() | Exclude this search from one of my sets |
![]() | Permalink to these results Paste this link in email or IM: |
| Atom feed for tracking future search results Paste this URL into your reader: |
6 messages in org.openoffice.fr.progRe: [prog] Gestion d'evennement| From | Sent On | Attachments |
|---|---|---|
| SEGUIN François | May 8, 2007 1:49 am | |
| Christophe Mathysen | May 8, 2007 3:45 am | |
| SEGUIN François | May 8, 2007 8:16 pm | |
| Christophe Mathysen | May 9, 2007 2:32 am | |
| SEGUIN François | May 12, 2007 1:25 am | |
| Christophe Mathysen | May 14, 2007 1:07 am | .sxc |

![]() | Permalink for this message Paste this link in email or IM: |
![]() | Permalink for this thread Paste this link in email or IM: |
| Atom feed for this thread Paste this URL into your reader: |
| Subject: | Re: [prog] Gestion d'evennement | Actions... |
|---|---|---|
| From: | Christophe Mathysen (chri...@fmsb.be) | |
| Date: | May 9, 2007 2:32:15 am | |
| List: | org.openoffice.fr.prog | |
Hello,
Pour ma part, mes tests se font dans les cellules, de manière transparante, c ce que je vais chercher en J5. De là, dans mon OO en tout cas, le document ne s'enregistre que si et seulement si c égal à cette valeur, Dans le cas contraire il ouvre le MSgBox.
Tu peux p-e expliquer un peu plus longuement ce que tu voudrais vérifier comme données, p-e qu'un solution se trouverait plus aisément.
Une autre solution adoptée dans l'entreprise, est le formatage conditionnel de ecllule en fonction de critères définissant ce qui peut s'y trouver ou non.
En gros si une date est pas encodée au format date, le fond de la cellule se colorise en rouge.
Je présume par ailleurs (sans être un pro de la programation) qu'il est possible de faire des tests de validité en VB directement mais là il faut savoir ce qu'on vérifie...
Le mer 09/05/2007 à 05:16, SEGUIN François a écrit :
Merci pour cet essai, mais ça ne fonctionne pas comme je voudrais car l'évennement est bien déclanché et le code effectué mais si la valeur ne correspond pas a ce que j'attends la sauvegarde s'effectue quand même et si elle est bonne on boucle sur l'évennement. Je recherche plutôt un moyen d'annuler la commande de sauvegarde.
François
----- Original Message ----- From: "Christophe Mathysen" <chri...@fmsb.be> To: <pr...@fr.openoffice.org> Sent: Tuesday, May 08, 2007 12:46 PM Subject: Re: [prog] Gestion d'evennement
Hello,
Je pense qu'un truc du genre devrait te mettre sur la piste
sub test rem
---------------------------------------------------------------------- rem define variables dim document as object dim dispatcher as object rem
---------------------------------------------------------------------- rem get access to the document document = ThisComponent.CurrentController.Frame dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
laValeur = thisComponent.currentController.activesheet.getCellRangeByName("d58").value Attest = thisComponent.currentController.activesheet.getCellRangeByName("j5").string If Attest = "N" then dispatcher.executeDispatch(document, ".uno:Save", "", 0, Array()) elseif Attest = "" then MsgBox( "Veuillez compléter le rôle linguistique. / Gelieve de taalrol in te vullen." ) End if
end sub
Ensuite tu modifies la barre d'outil (Personaliser la barre d'outils>Evénements>Enregistrement du document) en assignant la macro que tu as créé.
Christophe
Le mar 08/05/2007 à 10:50, SEGUIN François a écrit :
Bonjour,
Je souhaite contrôler des données avant d'enregister un document. J'utilise l'évennement "Enregistrement du document" qui me permet de savoir que l'utilisateur va enregistrer son document. Mais J'aimerai que cet évennement n'execute pas l'enregistrement si le contrôle des données n'est pas correct. Y a t'il un moyen?
F.SEGUIN
Christophe Mathysen Fédération des Mutualités Socialistes du Brabant Tel 02 506 96 11 - Fax 02 514 59 26
--------------------------------------------------------------------------------------- Orange vous informe que cet e-mail a ete controle par l'anti-virus mail. Aucun virus connu a ce jour par nos services n'a ete detecte.
Christophe Mathysen Fédération des Mutualités Socialistes du Brabant Tel 02 506 96 11 - Fax 02 514 59 26








.sxc