الأخوة الأفاضل
أعضاء المنتدى الكرام
السلام عليكم ورحمة الله وبركاته
أقدم لكم اليوم كود بسيط لكيفية إدراج ملف صوتى على الفورم
عند بداية تشغيل الفورم أم الانتهاء من العمل على المصنف
CODE
Private Sub UserForm_Initialize()<br />
WindowsMediaPlayer1.Controls.Play<br />
End Sub<br />
مؤثرات صوتية على الفورم.rar
كما يمكن تشغيل الملف الصوتى عند بداية فتح ملف الاكسيل بعيدا عن الفورم
وذلك بوضع الكود فى حدث فتح الملف ThisWorkbook كما يلى
CODE
Private Sub Workbook_Open()<br />
UserForm1.WindowsMediaPlayer1.Controls.Play<br />
End Sub<br />
<br />
وذلك إذا كان الملف الصوتى موجود على UserForm1
ويمكن إدراجه على ورقة الاكسيل نفسها من Developer
واتباع نفس الخطوات السابقة
تقبلوا جميعا احترامى وتقديرى