نجوم المشاركات

السلام عليكم هته الفكرة راودتني عندما كنت اصمم برنامج دليل الهاتف على طريقة سامسونج جالكسي لكني لم أنجح حينها في تنفيذها اليوم وصلت الى الطريقة بحمد الله وشكره واردت مشاركتكم بها المهم وصلت الى طريقة تجعل اللون الابيض يختفي من الفورم حيث يصبح شفافا بل منعدم وبهذه الطريقة اصبح يمكن جعل الفورم ياخذ اي شكل نريده كل ما عليك هو وضع هذا الكود في موديل Option Explicit Public Declare Function FWw Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Public Declare Function SWLg Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Public Declare Function DrMBar Lib "user32" Alias "DrawMenuBar" (ByVal hWnd As Long) As Long Public Declare Function SLWA Lib "user32" Alias "SetLayeredWindowAttributes" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Long, ByVal dwFlags As Long) As Long Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Public Declare Function ReleaseCapture Lib "user32" () As Long Public hWnd As Long Public Function Rabie_Sk(uf As Object, colors As Variant, Optional Sk As Variant = True) hWnd = FWw(vbNullString, uf.Caption) SWLg hWnd, -16, &H80080080: SWLg hWnd, -20, &H80000: DrMBar hWnd Select Case Sk Case True SLWA hWnd, colors, &H2, &H1 Case False SLWA hWnd, colors, 50, &H2 End Select End Function وفي حدث UserForm_Initialize ضع هذ الكود Rabie_Sk Me, vbWhite, True والباقي عليك في اختيار الشكل الذي تريده لا اطيل عليكم وأترككم مع المرفق تحياتي للجميع اجعل الفورم يأخذ اي شكل تريده.rar

االسلام عليكم اوفيسنا اليوم جلبت لكم كود يعوضكم عن عناء اضهار الازرار بطريقة جميلة في (حدث تحريك الماوس) و(حدث كليك) فبدلا من برمجة كل زر على حدى برمجت كود في موديل ستندار واخر في موديل كلاص الان اضف اي زر في الفورم وسيكون مبرمج مسبقا ولن تضطر لبرمجت اكواد الازرار مطلقا ملاحضة يمكنكم ان تختارو ما تشؤن من الاوان التي تعجبكم او تنسيقات بكل بصاطة ويسر ودلك في التغيير في مودل كلاص فقط ارجو ان ينال اعجالكم hoorabie.rar

السلام عليكم ورحمة الله وبركاته معليش كثرت الدروس دفعه واحده الله يعينكم المهم درسنا اليوم جمييييييييل جدا ان شاء الله تستفيدو منه وهو عن التحكم في حركات النص هذا الدرس https://www.youtube.com/watch?v=YKPqZqn4CTk اخوكم : علي آل شعله

هذا الدرس عباره عن تصميم بسيط اوضح فيه بعض الخصائص مثل .. التوهج وتلوين الاشكال والانعكاس وتلوين الصوره اترككم مع الدرس وانتظرو القادم باذن الله https://www.youtube.com/watch?v=lIb4TIoTgDU اخوكم : علي آل شعله

السلام عليكم كل عام وانتم بخير جميعا محتاج محاسب ضرورى

ترحيل برنامج بيع كروت الشحنبيع كروت شحن.rar

ارجوا من الخبراء شرح العمليات داخل الفجوال وشكرا

ممكن طريقة كتابة الكسر بسط ومقام في الخلية نرجو الشرح

انا اولا بحييكم علي الشغل والمجهود الرائع اللي في الموقع وبصراحة انا كنت محتاج طلب منكم انا عايز اتعلم الاكسيل وعمل الفورم وكل حلجة ارجوكم ساعدوني بالكتب والفديو وكل اللي تقدروا علية

السلام عليكم ورحمة الله وبركاتة --------------------------------- شباب اريد توضيح عيوب مشاركة الملف Shared Workbook لانى اعمل مع مجموعه لتجنب الوقوع فى مشكلة انا قمت بجمعها ولكن باللغة الانجليزية فياريت لو توضيح باللغة العربية ولكم جزيل الشكر

السلام عليكم ورحمة الله وبركاته اخوانى بارك الله فيكم ارجو عاجلا فالاختبارات غداً !!عمل معادلات الشيت للدور الثاني فقط حيث ان مدرستنا لم تعمل شيت الكتروني للدور الاول وطلب منى القيادي تسحيل البيانات على الكمبيوتر.. واهم الطلبات التي اريدها هي: 1 - اخراج المواد التي رسب فيها الطالب في خانة مواد الدور الثانى . 2 - اخراج حالة الطالب في الدور الثاني . 3 - ترحيل الراسب والناجح والمهني .

أستاذى ومعلمى ( يحيى حسين ) أولا - شرف لية مجرد رد حضرتك على عمل لية ، وأشادة حضرتك به أسعدتنى بجد ولكن بالنسبلا لملحوظة حضرتك بخصوص المدى الثابت للأرقام كان أمامى إختيارين 1- أن يكون المدى ثابت كما قمت برفعة 2- أن أقوم بعمل ( start num ) : (end num ) ودى معادلتها عملتها بالفعل ولكنى رأيت قبل رفع المرفق أنها بالحل الأول ستكون أكثر بساطة بالنسبة لأخى السائل وليست المسألة صعبة ليقوم مستخدم المعادلة بتحديد المدى المطلوب وفقا لمتطلباتة أستاذى أسعدنى مرورك ، وشرفتنى كلماتك وسعيد بملاحظتك لأنها إن دلت تدل على عبقرية تحلل وتدقق وأنا فعلا متعمدها للأسباب سابقة الذكر أستاذى شكرا على كلماتك ولاتدرك حضرتك مقدار سعادتى لمجرد ذكرك أسمى لعمل مع حضرتك تقبل تحيات : تلميذك الذى يعتز بأستاذيتك له وهذه هى الفكرة أستاذى أتمنى أن تنول شرف قبول عبقرية بحجم حضرتك الأرقام المفقودة.rar

السلام عليكم و رحمة الله إضافة لطرق الأخوة أعلاه اتبع الخطوات التالية : حدد النطاق . رايت كليك تنسيق الخلايا اختر مخصص ضع الكود التالية "0"0

السلام عليكم ورحمة الله أخي الكريم نورسعيد إن الصيغة التي وضعتهاهي صيغة شرطية بالدالة IF =IF(SUMPRODUCT(($J$6:$J6=J6)*($K$6:$K6=K6))<=1;$L6;"") والشرط المطلوب هو SUMPRODUCT(($J$6:$J6=J6)*($K$6:$K6=K6))<=1 وهو يتأكد من عدم تكرار مضمون الخانتين J6 و K6 في النطاقين $J$6:$J6 و $K$6:$K6 على الترتيب (أي من السطر الحالي إلى الأعلى) والصيغة >=1 يمكن جعلها =1 فإنا كان الشرط غير محقق (عدم تكرار الحالة) فإنه يأخذ مضمون الخلية L6 وإذا لم يكن كذلك (تحقق تكرار الحالة) فإن يترك الخلية فارغة ""، هذا بالنسبة لشرح الصيغة أتمنى أني وفقت في الشرح... بالنسبة لطلب أن نكون أصدقاء فنحن في هذا المنتدى إخوة وأصدقاء وأحباب وعائلة واحدة ولا شك في ذلك... بالنسبة للاتصال بي عن طريق الإيميل فهذا ممكن من خلال بياناتي لأني لا أعرف إن كان مسموحا وضع عنوان الإيميل من خلال الردود في المنتدى... أخوك بن علية

السلام عليكم بخصوص موضوع الهمزه ، بالمرفق كود رائع كنت قد أخذته من مشاركة لمدير المنتدى بارك الله فيه وفى القائمين على ظهور المنتدى بهذه الصورة ، هذا الكود يمنع كتابة الهمزة ولقد استفدت منه فى أعمال خاصة بى . hamza.rar

وانا اريد تعقيد السؤال شوي كيف يمكن ترتيب الاوائل حسب مجموع الدرجات . على ان تتغير المراكز تلقائيا بعد ادخال الدرجات