1. #1
    Candidat au Club
    Homme Profil pro
    Responsable de trafic
    Inscrit en
    janvier 2018
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Val d'Oise (Île de France)

    Informations professionnelles :
    Activité : Responsable de trafic
    Secteur : Transports

    Informations forums :
    Inscription : janvier 2018
    Messages : 8
    Points : 3
    Points
    3

    Par défaut Son pièces trébuchantes

    Bonjour,

    Dans le cadre du récapitulatif des heures d'astreintes d'agents, je souhaite intégrer une formule qui en fonction du résultat ferait sonner quelques pièces de monnaies ou bruit jackpot sur une machine à sous (fichier MP3 ou autre) ou pas.
    Est ce possible.
    Merci d'avance.

  2. #2
    Membre régulier
    Homme Profil pro
    Inscrit en
    septembre 2009
    Messages
    74
    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 : 74
    Points : 95
    Points
    95

    Par défaut Son

    Bonjour,
    Réponse un peu tardive, mais je dirai que oui. La mise à jour d'une formule et en fonction du résultat devrait pouvoir lancer un fichier son.
    Je vais regarder de plus près et revenir vers toi.
    Cordialement
    Libre Office Version: 6.0.1.1 (x64)
    Windows 10

  3. #3
    Membre régulier
    Homme Profil pro
    Inscrit en
    septembre 2009
    Messages
    74
    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 : 74
    Points : 95
    Points
    95

    Par défaut Son

    Bonjour,
    En pièce jointe un exemple.
    Dans D4 la formule qui additionne les cellules B4 et C4.
    Dans la cellule E4 une formule fonction (=CONTROLETOTAL(D4)). Cette formule est reliée à une fonction écrite en Basic (ControleTotal). Dans le code si le résultat de D4 est supérieur à 40 alors le son est lancé. Pour un autre total il faudra évidemment changer le code.

    Pour jouer le son je n'ai rien inventé mais simplement réécris du code que j'ai trouvé sur internet.

    Avec le fichier exemple il y a aussi un fichier son (Pieces.mp3) que j'ai trouvé sur internet. Si tu veux un autre son il te faut renommer le nouveau fichier en "Pieces.mp3" ou sinon tu change le code Basic.

    ATTENTION : le fichier son et le fichier CALC doivent se trouver dans le même répertoire.
    ATTENTION : Le fichier MP3 n'étant pas accepté en téléchargement je l'ai renommé en "Pieces.mp3.ods". Donc après téléchargement tu dois retirer les caractères ".ods" pour que cela fonctionne.

    Pour le code Basic j'ai mis le minimum, il peut être amélioré à ta guise.

    Cordialement
    Fichiers attachés Fichiers attachés
    Libre Office Version: 6.0.1.1 (x64)
    Windows 10

  4. #4
    Candidat au Club
    Homme Profil pro
    Responsable de trafic
    Inscrit en
    janvier 2018
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Val d'Oise (Île de France)

    Informations professionnelles :
    Activité : Responsable de trafic
    Secteur : Transports

    Informations forums :
    Inscription : janvier 2018
    Messages : 8
    Points : 3
    Points
    3

    Par défaut Pièces trébuchantes

    Mobydick,
    Je viens de lire tout mes mails.
    Vu que tu avais oeuvré. Cool.
    Je regarderai demain et te tiendrai au courant rapides
    Merci

  5. #5
    Candidat au Club
    Homme Profil pro
    Responsable de trafic
    Inscrit en
    janvier 2018
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Val d'Oise (Île de France)

    Informations professionnelles :
    Activité : Responsable de trafic
    Secteur : Transports

    Informations forums :
    Inscription : janvier 2018
    Messages : 8
    Points : 3
    Points
    3

    Par défaut Pièces trébuchantes

    Mobydick,

    Viens d'essayer ca fonctionne genial. Autre question, je pense que c'est donc possible itou de mettre une video.
    J'ai commencé à regarder tes macros j'ai changé le montant et ca marche.
    Etant débutant en macros , je reconnais que je comprends pas tout au niveau du vocabulaire.
    EX: formule fonction (=CONTROLETOTAL(D4); j'ai réécris du code, c'est quoi du code Basic.
    Enfin comme tu vois beaucoup de questions.

    Connais tu un bon moyen pour apprendre les macros.

    PS : J'ai d'autres questions.
    J'ai elaboré un fichiers open office pour des heures sup au boulot.
    Ca fonctionne mais je souhaiterai rajouter un bouton pour que les agents (chacun à sa session) puissent imprimer leurs fiches et les sauvegarder.
    J'ai enregistré une macro mais elle ne fonctionne que sur ma session.
    Comment faire pour que cela fonctionne pour tous les agents.


    Bien cordialement

  6. #6
    Membre régulier
    Homme Profil pro
    Inscrit en
    septembre 2009
    Messages
    74
    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 : 74
    Points : 95
    Points
    95

    Par défaut Son

    Bonjour,
    Je répond dans l'ordre de tes interrogations.

    Autre question, je pense que c'est donc possible itou de mettre une video.
    Comme je n'ai jamais eu le besoin de lancer une vidéo depuis Calc. Je ne saurai te dire là à l'instant T. (à voir)

    Etant débutant en macros , je reconnais que je comprends pas tout au niveau du vocabulaire.
    EX: formule fonction (=CONTROLETOTAL(D4); j'ai réécris du code, c'est quoi du code Basic.
    CALC propose de nombreuses formules ou fonctions intégrées. Par contre on peut par programmation écrire d'autres fonctions depuis l'éditeur de Basic. Dans le cas présent c'est moi même qui est donné ce nom de "CONTROLETOTAL"
    Cette fonction fait appel à la fonction que j'ai écrite, qui s’appelle donc "ControleTotal"et qui sera exécutée. Et pour "D4" c'est la valeur de la cellule D4 que j’envoie en paramètre à cette fonction pour qu'elle effectue le traitement que j’attends d'elle.
    Pour ce qui est du code Basic, c'est tout simplement ce que l'on écrit dans l'éditeur de Basic. C'est un langage de programmation comme d'autres.

    Connais tu un bon moyen pour apprendre les macros.
    Oui il y a de nombreuses façons d'apprendre ce langage. Notamment la FAQ de ce site. Et aussi les livres (voir les liens ci-dessous.
    La FAQ
    https://www.developpez.net/forums/d1...vos-questions/

    Livre
    https://openoffice-libreoffice.devel...ue#L2212132476

    Pour moi le meilleur libre c'est celui-ci. Je ne sais plus s'il est encore édité mais on le trouve en occasion sur internet. C'est avec celui-ci que j'ai appris le Basic.
    Nom : Marcelly.jpeg
Affichages : 21
Taille : 8,8 Ko

    En fin :
    Ca fonctionne mais je souhaiterai rajouter un bouton pour que les agents (chacun à sa session) puissent imprimer leurs fiches et les sauvegarder.
    J'ai enregistré une macro mais elle ne fonctionne que sur ma session.
    Comment faire pour que cela fonctionne pour tous les agents.
    Tu as du probablement utiliser l'enregistreur de macro pour sauvegarder tes fiches et je suppose que l'enregistreur à garder le chemin de ta session. Quand on travaille avec plusieurs sessions il faut grace au code récupérer l'utilisateur en cours au travers de la variable "USERNAME" ou "USER" en fonction du système (Windows/Linux).
    Le mieux serait que tu joigne ton fichier que tu auras préalablement anonymisé et en y mettant que des exemples bidons mais qui contiendra surtout les macros que tu as déjà créé. C'est en lisant le code que je pourrai corriger et surtout t'aiguiller.

    Pense aussi à préciser ton système d'exploitation et la version de LibreOffice ou OpenOffice.

    Cordialement
    Libre Office Version: 6.0.1.1 (x64)
    Windows 10

Discussions similaires

  1. [OL-2010] Extraire une seule pièce jointe en pdf et changer son nom
    Par cointel dans le forum VBA Outlook
    Réponses: 1
    Dernier message: 28/12/2014, 02h42
  2. Réponses: 1
    Dernier message: 07/07/2007, 00h38
  3. ecrire son OS (assembleur ??)
    Par Anonymous dans le forum Programmation d'OS
    Réponses: 9
    Dernier message: 25/11/2002, 19h25
  4. Aquisition de son
    Par don-diego dans le forum DirectX
    Réponses: 1
    Dernier message: 20/06/2002, 09h16

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