Sub MuteDemute()
Set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys Chr(173)
End Sub
Bonsoir,
...fonctionne chez moiCode:Sub MuteDemute() Set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys Chr(173) End Sub
A+
kjin