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

Macros et VBA Excel Discussion :

VBA/Excel: lecture d'un son a l'ouverture d'une boite de dialogue


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau Candidat au Club
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 2
    Points : 1
    Points
    1
    Par défaut VBA/Excel: lecture d'un son a l'ouverture d'une boite de dialogue
    Bonjour,
    Je souhaiterais qu'un son soit lu à l'ouverture d'un boite de dialogue automatiquement: comment puis je faire ca?
    (je sais comment insérer des son et les déclencher mais pas en mode automatique)
    je vous remercie.

  2. #2
    Expert éminent
    Avatar de fring
    Homme Profil pro
    Engineering
    Inscrit en
    Février 2008
    Messages
    3 900
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : Belgique

    Informations professionnelles :
    Activité : Engineering

    Informations forums :
    Inscription : Février 2008
    Messages : 3 900
    Points : 7 964
    Points
    7 964
    Par défaut


    Tu utilises quoi pour lire le fichier son, WMP ?
    Si oui, tu trouveras sans doute ton bonheur dans le tuto ci-dessous

    http://silkyroad.developpez.com/VBA/WindowsMediaPlayer/

  3. #3
    Nouveau Candidat au Club
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 2
    Points : 1
    Points
    1
    Par défaut
    j'utilise des sons Wave, je les lis directement avec excel

  4. #4
    Expert éminent sénior

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Points : 20 147
    Points
    20 147
    Par défaut
    bonjour

    pour déclencher un son Wave placé dans la feuille de calcul :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Worksheets("Feuil1").OLEObjects("objet 1").Verb

    Ensuite, place le code dans l'evenement Initialize du UserForm:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub UserForm_Initialize()
    Worksheets("Feuil1").OLEObjects("objet 1").Verb
    End Sub
    http://silkyroad.developpez.com/VBA/UserForm/




    bonne journée
    michel

  5. #5
    Membre éprouvé
    Avatar de fred65200
    Profil pro
    Inscrit en
    Septembre 2007
    Messages
    901
    Détails du profil
    Informations personnelles :
    Âge : 57
    Localisation : France

    Informations forums :
    Inscription : Septembre 2007
    Messages : 901
    Points : 1 207
    Points
    1 207
    Par défaut
    bonsoir,

    une autre méthode pour les sons .wav
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.ExecuteExcel4Macro "SOUND.PLAY(,""C:\WINDOWS\MEDIA\TADA.WAV"")"
    Chemin du fichier son à adapter.

    cordialement

Discussions similaires

  1. VBA - Excel / Lecture fichier texte
    Par House MD dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 20/12/2007, 13h27
  2. [VBA-Excel]Avoir une boite de dialogue avec les arguments des fonctions ?
    Par EvaristeGaloisBis dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 29/05/2007, 09h37
  3. [VBA][Excel] Comment bien structurer son code?
    Par skystef dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 15/03/2007, 19h39
  4. Réponses: 3
    Dernier message: 09/11/2006, 17h05
  5. Réponses: 6
    Dernier message: 14/06/2006, 08h56

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