مجدى يونس قام بنشر يناير 28, 2021 قام بنشر يناير 28, 2021 كلمات تتحرك داخل الفورم باستخدام WebBrowser الاكواد الاداة WebBrowser1 ------ Option Explicit Public LeTexte As String Public LaCouleur As String --- Private Sub UserForm_Initialize() LeTexte = Sheets("magdi").Range("a1").Text LaCouleur = "#990000" ParametresHtml End Sub Sub ParametresHtml() UserForm3.WebBrowser1.Navigate _ "about:<html><body scroll='no'><font color= " & LaCouleur & " size='8' face='NEW'>" & _ "<marquee>" & LeTexte & "</marquee></font></body></html>" End Sub 3
Ali Mohamed Ali قام بنشر يناير 28, 2021 قام بنشر يناير 28, 2021 جزاك الله خير الثواب استاذ مجدى كلها موضوعات مهمة جعله الله فى ميزان حسناتك 2
مجدى يونس قام بنشر يناير 28, 2021 الكاتب قام بنشر يناير 28, 2021 الف شكر لك نتمنى تكون فى ميزان حسناتنا
عبدالله بشير عبدالله قام بنشر يناير 28, 2021 قام بنشر يناير 28, 2021 بارك الله فيك وبك حاج يونس موضوعاتك مفيدة وجديدة
Saadrafic قام بنشر يناير 30, 2021 قام بنشر يناير 30, 2021 ممكن استاذ مجدي اضيف مع الكلام المتحرك صوره تمشي مع النص وليكن صوره لوجو
مجدى يونس قام بنشر يناير 30, 2021 الكاتب قام بنشر يناير 30, 2021 بالنسبة لملف العمل انا قلت فى فيديوهاتى وبنزل الاكواد المنتدى تعليمى نشوف لك موضوع الصورة
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.