XL 2019 VBA pour mise du son à 30 à l'ouverture d'un fichier

[Webperegrino]

Bonjour le Forum,
A l'ouverture d'un fichier dans Private Sub Workbook_Open() de ThisWorkBook du développeur VBA, existe-t-il une solution de code pour placer le son de l'ordinateur au niveau 30 par exemple ?
J'ai essayé en faisant "Enregistrer une macro" puis j'ai activé les touches hautes de mon clavier 'haut-parleur plus fort ou moins fort' jusqu'à la jauge 30 mais la ligne de code ne s'est pas créée automatiquement...
Peut-être me faut-il aussi un "Pass'Macro" imposé dans mon application Excel devenue oligarchique ?
Merci d'avance pour votre aide,
Webperegrino

 

[Phil69970]

Bonjour @Webperegrino, le forum

Une piste ici et voir aussi là qui permet la sélection du volume.....

@Phil69970

 

[Webperegrino]

Bonjour le Forum,
Bonjour Phil69970,

Je viens d'expérimenter la solution n° 2 : c'est parfait avec ...

   Sub testJouePhrase()
        VolSet (30)
       'Call JouePhrase("Hello !")
   End Sub

Merci beaucoup,
Cordialement,
Webperegrino