Démarrage automatique d'une bande son.

Guillaume -  
 Guillaume -
Bonjour à tous,

Voilà, j'ai crée un clesseur sur excel.

Je souhaite qu'a l'ouverture de mon fichier une bande son démarre automatiquement.
Avec une macro qui démarre à l'ouverture par exemple.

Pouvez-vous m'aider ?

3 réponses

  1.
    Anicottedirgala Messages postés 1137 Statut Membre 440
     
    Salut,

    Uui c'est possible

    1 - Insérer l'objet son (ton fichier son) que l'on appellera "test" dans la feuille de calcul

    2 - Double cliquer sur ce fichier pour le lire
    ou
    2 - bis: créer une macro qui exécute la lecture de ce fichier son automatiquement
    la macro sera du type

    ActiveSheet.Shapes("test" ).Sel?ect
    selection.Verb Verb:=xlPrimary
    1
  2. Guillaume
     
    Merci de la réponse.

    Donc, j'ai inséré mon objet qui s'appel (Bonjour).

    Apès je crée une macro qui double clic sur mon fichier.
    Par contre y-a rien d'automatique !

    je rentre quoi en code ?
    dans générale ou Worksheet ?

    Merci ;)
    1
    1. Anicottedirgala Messages postés 1137 Statut Membre 440
       
      Voici un exemple de message d'accueil qui s'affiche à l'ouverture d'un classeur

      Private Sub Workbook_Open()
      MsgBox "Bonjour " & Environ("UserName")
      End Sub
      0
  3. Guillaume
     
    Alors j'ai essayé avec :

    Private Sub Workbook_Open()
    MsgBox "Bonjour " & Environ("UserName")
    End Sub

    J'ai bien un message d'accueil !

    Par contre impossible de le faire fonctionner avec ma bande son !

    ex :

    Private Sub Workbook_Open()

    ' Bonjours Macro
    ' Bonjours
    '
    ' Touche de raccourci du clavier: Ctrl+s
    '
    ActiveSheet.Shapes.Range(Array("Object 1066")).Select
    Selection.Verb Verb:=xlPrimary
    Range("G13").Select
    End Sub
    0