تشغيل صوت mp3 ( تلقائي) بدون ضغط أي زر عند ظهور اليوزرفورم

[صالح ربيع]

السلام عليكم ورحمة الله وبركاته

تقبل الله منا ومنكم صالح الأعمال وكل عام وأنتم بخير ومن العايدين الفايزين

عندي سؤال واتمنى منكم الجواب: 
 كيف نجعل الصوت mp3 يعمل بصورة تلقائية عند ظهور اليوزرفورم بدون ضغط أي زر
  بشرط عند الضغط على زر الدخول إلى الشيت يتوقف الصوت وعند الضغط على زر الاغلاق يتوف الصوت

تعديل.rar

[حسين مامون]

ضع الكود لي في زر تشغيل الصوت في حدث الفورم

Private Sub UserForm_Initialize()
WindowsMediaPlayer1.URL = ThisWorkbook.Path & "\20.MP3"
WindowsMediaPlayer1.Controls.Play

End Sub

 

[صالح ربيع]

 

وضعت الكود في حدث الفورم فلم يشتغل الصوت

 

 

 

للرفع

[حسين مامون]

تعديل.rar

[صالح ربيع]

استاذ حسين الملف لا يعمل بصورة صحيحة يرجى ارسالة مرة ثانية

[حسين مامون]

انسخ الكود في مشاركتي السابقة  ثم الصقه داخل الفورم

لا اكثر ولا اقل 

عندي شغال 100/100

[صالح ربيع]

جزاك الله خيرا