Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  1. #1
    Candidat au Club
    Homme Profil pro
    Créateur de tableaux
    Inscrit en
    mars 2019
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 55
    Localisation : France, Oise (Picardie)

    Informations professionnelles :
    Activité : Créateur de tableaux

    Informations forums :
    Inscription : mars 2019
    Messages : 3
    Points : 3
    Points
    3

    Par défaut Code Open Office ne fonctionnant pas avec Libre Office

    Bonjour, j'ai un code Open Office qui m"affiche automatiquement la tranche d'age par rapport à une datefield remplie
    Ce code fonctionne parfaitement sur Open Office mais pas sur libre office.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    REM  *****  BASIC  *****
    Sub SelectTranche(oEvent)
    Dim AnneeN As Long
    Dim Tranche As Long
    Dim i As Integer
    Dim lbxTranche As Object
     
    	AnneeN = left(oEvent.Source.Date,4)
    	Tranche = Year(Now) - AnneeN
    	Select case Tranche
    		case is < 10 
    			i = 0
    		case is < 13
    			i = 1
    		case is < 16
    			i = 2
    		case is < 18
    			i = 3
    		case else
    			i = 4
    	End Select
    	lbxTranche = theControls(7)
    	lbxTranche.SelectItemPos(i,true)
     
    End Sub
    Fichiers attachés Fichiers attachés

  2. #2
    Membre régulier
    Homme Profil pro
    Inscrit en
    septembre 2009
    Messages
    84
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Vendée (Pays de la Loire)

    Informations professionnelles :
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : septembre 2009
    Messages : 84
    Points : 112
    Points
    112

    Par défaut Code Open Office ne fonctionnant pas avec Libre Office

    Bonjour,
    Il faut changer ton code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    AnneeN = left(oEvent.Source.Date,4)
    par

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    AnneeN = oEvent.Source.Date.Year
    Cordialement
    Libre Office Version: 6.0.1.1 (x64)
    Windows 10

  3. #3
    Candidat au Club
    Homme Profil pro
    Créateur de tableaux
    Inscrit en
    mars 2019
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 55
    Localisation : France, Oise (Picardie)

    Informations professionnelles :
    Activité : Créateur de tableaux

    Informations forums :
    Inscription : mars 2019
    Messages : 3
    Points : 3
    Points
    3

    Par défaut Code refait pour Libre Office

    Voici le code que j'ai refais qui fonctionne à merveille

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    Sub SelectTranche(oEvent)
    Dim AnneeN As Long
    Dim Tranche As Long
    Dim i As Integer
    Dim lbxTranche As Object
       If isNumeric(oEvent.Source.Date) Then
          AnneeN = left(oEvent.Source.Date,4)
       Else
          AnneeN = oEvent.Source.Date.Year
       End If   
       Tranche = Year(Now) - AnneeN
       Select case Tranche
          case is < 10
             i = 0
          case is < 13
             i = 1
          case is < 16
             i = 2
          case is < 18
             i = 3
          case else
             i = 4
       End Select
       lbxTranche = theControls(10)
       lbxTranche.SelectItemPos(i,true)
    End Sub

Discussions similaires

  1. [LibreOffice][Tableur] macro ne fonctionne pas avec versions récentes de Libre Office
    Par tikanak dans le forum OpenOffice & LibreOffice
    Réponses: 5
    Dernier message: 08/04/2014, 14h19
  2. Code ne fonctionnant pas avec un élément de tableau
    Par dubitoph dans le forum Drupal
    Réponses: 0
    Dernier message: 21/09/2011, 17h02
  3. open ne fonctionne pas avec firefox
    Par ninon dans le forum Général JavaScript
    Réponses: 4
    Dernier message: 07/07/2009, 09h10
  4. [AJAX] mon code ne fonctionne pas avec IE mais bien avec FF
    Par beegees dans le forum Général JavaScript
    Réponses: 2
    Dernier message: 31/01/2009, 14h59
  5. code ne fonctionnant pas avec mozilla firefox
    Par durnambule dans le forum Général JavaScript
    Réponses: 4
    Dernier message: 03/01/2008, 16h07

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo