IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
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

Contribuez Discussion :

Installer la voix de virginie sur W 7 64 bits et avoir le speech speak en francais dans vba


Sujet :

Contribuez

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Inactif  

    Homme Profil pro
    cuisiniste
    Inscrit en
    Avril 2009
    Messages
    15 374
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : cuisiniste
    Secteur : Bâtiment

    Informations forums :
    Inscription : Avril 2009
    Messages : 15 374
    Billets dans le blog
    8
    Par défaut Installer la voix de virginie sur W 7 64 bits et avoir le speech speak en francais dans vba
    Bonjour a tous
    apre m'ettre amuser avec la voix de Google je me suis interessé a l'environnement Windows
    je trouvais dommage que la voix de virginie ne soit pas utilisable en 64 bits
    en fait il y a une astuce pour que ca fonctionne je viens de tester
    étape 1
    telecharger la voix de virginie
    IcI par exemple et installez la

    une fois la voix installé comme microsoft n'a pas juger bon de nous donner la possibilité de changer la voix
    nous allons le faire manuellement
    étape 2
    allons trifouiller dans Windows et rendez vous dans
    C:\Windows\sysWOW64\speech\SpeechUX
    et cliquez sur sapi.cpl

    vous avez la fenêtre de synthèse vocale et surprise dans le choix on retrouve virginie
    choisissez la
    et appliquer
    a partir de maintenant dans vba le
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.Speech.Speak
    sera en Français avec la voix de virginie
    =================================================================

    exemple pour tester
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Sub test_speech()
    Application.Speech.Speak "bonjour tout le monde "
    End Sub
    si vous ouvrez le narrateur seule la voix de anna(anglais) est pris en compte
    la voix de virginie ne s'intègre donc pas totalement dans l'environnement Windows
    mais cela est suffisant pour s'amuser en vba ,vbs ,vb,perl et bien d'autre
    en essayant le narrateur la voix de anna se remet par défaut il faudra donc recommencer l'opération étape 2

    c'est une autre alternative pour ceux qui ne sont ou ne veulent pas être connectés et utiliser mon module Google voix

    j'ai tester et ca fonctionne impeccablement
    mes fichiers dans les contributions:
    mail avec CDO en vba et mail avec CDO en vbs dans un HTA
    survol des bouton dans userform
    prendre un cliché d'un range

    si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
    et n'oublie pas de voter

  2. #2
    Expert éminent

    Profil pro
    Conseil, Formation, Développement - Indépendant
    Inscrit en
    Février 2010
    Messages
    8 562
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations professionnelles :
    Activité : Conseil, Formation, Développement - Indépendant

    Informations forums :
    Inscription : Février 2010
    Messages : 8 562
    Par défaut
    Bonjour

    Testé impec !

    Je n'ai aucune idée de ce que je ferais, ou pas, avec tes 2 contributions (celle-ci et la dictée) mais ayant sur mon PC textAloud et des voix achetées, je me demandais si je peux faire la même chose en utilisant ce canal dans VBA (quand on lance de nouvelles idées elle vous retombent dessus ! : si le coeur t'en dit...

    Edit : j'ai regardé. Il existe une possibilité command line mais elle est payante et très cher. Donc oublie...

  3. #3
    Inactif  

    Homme Profil pro
    cuisiniste
    Inscrit en
    Avril 2009
    Messages
    15 374
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : cuisiniste
    Secteur : Bâtiment

    Informations forums :
    Inscription : Avril 2009
    Messages : 15 374
    Billets dans le blog
    8
    Par défaut re
    Bonsoir chris

    oui je pense que l'on doit pouvoir lancer une commande en vba ou vbs
    regarde du coté de l'object"WScript.Shell" on lance les applications avec ca en général je n'est pas ton app textloud donc je ne peut pas tester
    mes fichiers dans les contributions:
    mail avec CDO en vba et mail avec CDO en vbs dans un HTA
    survol des bouton dans userform
    prendre un cliché d'un range

    si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
    et n'oublie pas de voter

  4. #4
    Expert éminent

    Profil pro
    Conseil, Formation, Développement - Indépendant
    Inscrit en
    Février 2010
    Messages
    8 562
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations professionnelles :
    Activité : Conseil, Formation, Développement - Indépendant

    Informations forums :
    Inscription : Février 2010
    Messages : 8 562
    Par défaut
    Re,

    Comme tu avais attisé ma curiosité, j'ai téléchargé le module CommandLine de cette appli (autre exe que le soft lui-même en essai pour 30 jours)et effectivement avec un simple shell cela fonctionne. Je me coucherai moins bête ...

    Edit Coucou Clément : je n'avais pas rafraichi. Toujours bon à savoir. Merci...

    Edit2 correction fautes de frappe

  5. #5
    Membre extrêmement actif
    Avatar de NVCfrm
    Homme Profil pro
    Administrateur Système/Réseaux - Developpeur - Consultant
    Inscrit en
    Décembre 2012
    Messages
    1 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations professionnelles :
    Activité : Administrateur Système/Réseaux - Developpeur - Consultant
    Secteur : High Tech - Produits et services télécom et Internet

    Informations forums :
    Inscription : Décembre 2012
    Messages : 1 037
    Billets dans le blog
    5
    Par défaut
    Salut,
    pour compléter;

    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
    Sub virgi()
     
        Dim texte, parler
        texte = "Bonjour Patrick. Je suis contente de te revoir"
        Set parler = CreateObject("sapi.spvoice")
        With parler
            .Volume = 50
            .Speak texte
            texte = "Tu souhaites donc une voix plus discrète ?"
            .Volume = 10
            .Speak texte
            texte = "Parles fort ! J'entends pas ta réponse."
            .Volume = 100
            .Speak texte
            texte = "Tu peux régler la vitesse de lecture et bien d'autres choses, tu sais ! Telle que commencer la lecture du texte à une position de ton choix. Ou déterminer le nombre de lettres du dernier mot lu."
            .Rate = 6
            .Speak texte
            .Rate = 1
            .Speak "C'était Trop rapide"
            Debug.Print .Voice.ID
            texte = "Oui Patrick! Tu peux affecter ces réglages à des contrôles dans un Userform."
            .Speak texte
        End With
     
        End Sub
    Mais c'est limité pour quelqu'un qui veut faire des trucs élaborés.
    MicroSoft a une api Microsoft Speech Object Library garnie qui permet des choses très avancés.
    Voir le site http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx
    C'est manipulable en vba en cochant la référence.

    Un exemple très peu significatif des possibilités:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    Dim Sp As SpSharedRecoContext
    Set Sp= New SpSharedRecoContext
    With Sp
            .Voice.Volume = 50
            .Voice.Speak "Bonjour"
    End With

  6. #6
    Inactif  

    Homme Profil pro
    cuisiniste
    Inscrit en
    Avril 2009
    Messages
    15 374
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : cuisiniste
    Secteur : Bâtiment

    Informations forums :
    Inscription : Avril 2009
    Messages : 15 374
    Billets dans le blog
    8
    Par défaut re
    bonjour a tous
    c'est curieux quand même ???

    les voix en Français sont un problème récurent pour W 7 64 depuis sa sortie
    et le fait de lancer un sujet fait sortir d'après ce que je viens de lire 2 autre solutions
    comme quoi? hein..........nvcfrm je vais regarder de plus prêt ce que tu a proposé ca me semble plus adapter pour faire un module générique pour tous
    mes fichiers dans les contributions:
    mail avec CDO en vba et mail avec CDO en vbs dans un HTA
    survol des bouton dans userform
    prendre un cliché d'un range

    si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
    et n'oublie pas de voter

  7. #7
    Inactif  

    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2012
    Messages
    4 903
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Finance

    Informations forums :
    Inscription : Janvier 2012
    Messages : 4 903
    Billets dans le blog
    36
    Par défaut
    Bonjour,


    Citation Envoyé par 78chris Voir le message
    Bonjour

    Testé impec !

    Je n'ai aucune idée de ce que je ferais, ou pas, avec tes 2 contributions (celle-ci et la dictée) mais ayant sur mon PC textAloud et des voix achetées, je me demandais si je peux faire la même chose en utilisant ce canal dans VBA (quand on lance de nouvelles idées elle vous retombent dessus ! : si le coeur t'en dit...

    Edit : j'ai regardé. Il existe une possibilité command line mais elle est payante et très cher. Donc oublie...
    Tout comme Patrick, je ne connais pas ton application, et je ne pense pas que ce soit compatible avec VB6 - VBA, mais, chez Microsoft, ils offrent gratuitement une plate-forme pour applications numériques. C'est compatible avec la plate-forme .net. Sauf que c'est en 64 bits uniquement:



    Le runtime:

    http://www.microsoft.com/en-us/downl....aspx?id=27225

    Les voix et les modules de reconnaissance vocale:

    http://www.microsoft.com/en-us/downl...190a24fa6=True


    Le SDK:

    http://www.microsoft.com/en-us/downl....aspx?id=27226

Discussions similaires

  1. [TPW] Installation de TPW 1.5 sur Windows 7 64 bits
    Par inestahri dans le forum Turbo Pascal
    Réponses: 1
    Dernier message: 04/01/2013, 15h01
  2. Réponses: 4
    Dernier message: 23/06/2010, 13h33
  3. Installation de composants Delphi 7 sur Delphi 2005
    Par Leobaillard dans le forum Composants VCL
    Réponses: 5
    Dernier message: 22/06/2005, 18h50
  4. pb d'installation 8.0.0 RC1 sur Win XP pro
    Par baldarra dans le forum PostgreSQL
    Réponses: 1
    Dernier message: 20/12/2004, 19h12
  5. Réponses: 5
    Dernier message: 24/11/2002, 11h36

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