Jouer un son a l ouverture d un classeur exel

Fermé
totoff50 Messages postés 1 Date d'inscription samedi 26 février 2011 Statut Membre Dernière intervention 26 février 2011 - 26 févr. 2011 à 09:42
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 27 févr. 2011 à 18:53
bonjour a tous
voila j ai deux problèmes, le premier, c est que je voudrais par une macro, ouvrir un classeur avec une petite musique ou un petit son, et le deuxième, c est que j aimerais supprimer le petit point d exclamation de l icône, qui se mets sur l icone quand il y as une macro dans un classeur. petite précision mon extension est xlsm.
merci d avance pour les bonnes âmes qui se pencheront sur mes petits problèmes.
A voir également:

2 réponses

ralag Messages postés 15 Date d'inscription dimanche 27 février 2011 Statut Membre Dernière intervention 2 mars 2011 2
27 févr. 2011 à 17:36
Salut,

Dans le VBA (Alt + F11)
double clic sur ThisWorbook et coller :

Private Sub Workbook_Open()
Call Shell("C:\Program Files\Media Player\wmplayer.exe C:\chimes.wav", vbHide)
End Sub

Pour l'icone je pense qu'il faudrait faire un xls ou allez dans l'explorateur / outils / options des dossiers /type de fichier/ et changer l'icone mais cela n'est pas recommandé.
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
Modifié par michel_m le 27/02/2011 à 18:54
Dans le module Thisworbook

Private Declare Function Beep Lib "Kernel32" (ByVal Fq As Long, ByVal Tm As Long) As Long 
  
Private Sub Workbook_Open() 
Beep 500, 500 
Beep 1500, 500 
Beep 700, 800 
End Sub 

1° nombre=tonalité, 2°=durée
Michel
0