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

السلام عليكم ورحمة الله وبركاته قد يبدو العنوان غريب بعض الشيء ، ولكن أحب أن أضع عنوان معبر عن الموضوع ليسهل فهم الفكرة ، حيث تتلخص الفكرة ببساطة في أنه يتم استخراج القيم الغير مكررة أي القيم الفريدة وفي العمود المجاور توضع القيم المرتبطة بها ويفصل بينها فاصل. وبالمثال كما تعودنا يتضح المقال ، حيث أن التطبيق العملي أفضل من الكلام النظري بفرض أن لدينا مجموعة من الأشخاص ولهم مبيعات مختلفة ، والمطلوب عمل تقرير ملخص لكل شخص بمبيعاته ، لاحظ الشكل التالي للمعطيات لاحظ شكل النتائج المطلوبة قبل تنفيذ الكود يجب تفعيل المكتبة التالية من خلال أدوات Tools اختر الأمر References ثم اختر المكتبة المسماة Microsoft Scripting Runtime ، كما هو موضح بالصورة التالية : للإطلاع على الكود والملف المرفق قم بزيارة الرابط التالي رابط الموضوع من هنا

صحيح وفي محله . ولكن اعتقد الاجابة الافضل انه لكل مقام مقال هذه باختصار ولكن الذي يجب ان نعرفه نوعية المعالجة ففي الريكورد ست تتم المعالجة محليا حتى نعمل او نستدعي الامر update اما الا سكيو ال فتتم المعالجة على السيرفر وهنا فد لايظهر الفرق كما ذكرت في الاكسس لانك بفتح الملف كل شي لديك فتعتبر محليا وسيرفريا اما عند فصل الواجهات عن القاعدة وبالتقنيات الاخرى فيظهر الفرق السابق جليا . والموضوع اكبر لو بحثت قليلا فيما استخدم افضل او ما هو الفارق تحياتي

بارك الله فيك أخى وأستاذى ياسر وائراء للموضوع يمكن الحصول على نفس النتائج بمعادلة و udf تحياتى List The Unique And Concatenate Corresponding Values udf.rar

حاول المعادلة التالية =SUMIFS(B3:B6,A3:A6,">100",A3:A6,"<400") عذراً اخي ابو حنين لم انتبه الى مشاركتك

اخ اسلام انا ذكرت لك سبب المشكلة هو تحقق الشرط وهو وجود الاجمالي خالي . الاان ساشرح لك لماذا خالي وهو السبب المخفي لديك حدث عند الخروج للكائن تابع17 فهو غير مفعل السطر عند الخروج مع ان السطر موجود وما عليك الا النقر عند النقاط ليتعرف الكائن تابع17 على السطر الذي يسند قيمة الاجمالي . وبكذا صرنا حبايب ولو تعرف اديش اتبهذلت علشان اطلع السبب وسبب فعلا غبي اي مخفي تحياتي

لماذا لا تستعمل الدالة SUMPRODUCT =SUMPRODUCT(--(A3:A5>100);--(A3:A5<400);--(B3:B5)) او الدالة SUMIFS =SUMIFS(B3:B6;A3:A6;">100";A3:A6;"<400")

تم إجراء بعض التغييرات جرب المرفق مشروع البصمة 2 - تجربة 2.rar

الأستاذ / saud133 السلام عليكم ورحمة الله وبركاته إليك الملف به المطلوب. AAA.rar

السلام عليكم معذرة على التاخير في رفع دروس جديدة ولكن ان شاء الله كلما تيسر الوقت ساضيف درس جديد والان اترككم مع الدرس وان شاء الله تعم الفائدة

ماشاء الله عليكم اساتذتنا الكرام... الشكر كل الشكر اخي الكريم بن علية حاجي واخي الحبيب ياسر ابو البراء... اسال الله ان يبارك لكما في علمكما وصحتكما واهليكما...وان يفرج عنكم كل هم وغم ويرزقكما واياكم الجنة .. شكرا والف شكر.

بسم الله ما شاء الله ربي يزيدك بسطةً في العلم والجسم ويفتح عليك باب فيوضاته لتنعم بقربه وتتمتع برضاه لا أدري ما أكتب والأحرف قد هربت والكلمات تبعثرت والجمل قد ذابت واللسان قد أبهره صنعك فعجز عن التعبير لك عن شكره بالفعل عاجز عن التعبير ولا أدري ما أكتب لك رحم الله والديك يا ابا عيد وتقبل الله عملك وسدد خُطاك لكل خير وسهل دربك لرضاه

السلام عليكم ورحمة الله ما قدمته أخي الحبيب "ياسر خليل" يفوق كل تصور، جازاك الله خير ووفقك لكل خير... وقد حاولت أن أفهم عمل الكود ولكن دون جدوى... والشيء الوحيد الذي أعتقد أني فهمته هو أن الخلل في بعض النتائج الخاطئة سببه هو "تنسيق المتغيرات" المستعملة في الكود... لذا أقترح حذف السطرين التاليين من الكود (أو إلغاؤهما) وهما السطرين : Option Explicit و Dim X, Y(), I&, J&, K, cl&, T& والتعديل في الملف المرفق... ملاحظة: تم إضافة "زر" RUN لتنفيذ الكود... ويبقى دائما الكود رائعا... بن علية Stock YasserKhalil Officena.rar

تفضل التعديل اخ وائل هناك بعض الاكواد حقيقة لم اعرف الغاية منها فقمت بالتعديل على طريقتي ارجز ان تكون الامور صحيحة مع العلم اني اختبرت البرنامج من حيث عمل الشجرة والاضافة في جدول الفوائد والبحث وجميعها تعمل بصورة جيدة جرب البرنامج واي اشكال انا بالخدمة asd.rar

السلام عليكم ورحمة الله تعالى وبركاته اخى الحبيب من قواعد وقوانين المشاركة فى المنتديات هناك قاعدة وهى جعل موضوع لكل سؤال على حدة اما وبخصوص عنوان الموضوع جرب البحث بهذه الطريقة قد يعجبك هيكلة جديدة للجداول 4-10-2016_UP_.rar

أشكرك على المتابعة وضبط المعادلات كنت فى عجلة ( عجلة أى سرعة مش بسكلته ) من امرى أنا مثلك تماما أفضل الاكواد والتعامل معها على المعادلات وخصوصا الصفيف لكن فيه ناس بتحب المعادلات نعمل ايه ؟! غير اننا نحاول تقديم كل الحلول ( وجهة نظر ) تحياتى

أخي وحبيبي مختار كما يسعدني مداخلاتك الرائعة لإثراء الموضوع بالنسبة للحل المقدم رائع وجميل وإن كنت لا أحبذ استخدام المعادلات (خصوصاً معادلات الصفيف) عموماً بالنسبة للمعادلات يجب ضبطها قليلاً بتثبيت النطاق المعادلة الأولى =IFERROR(INDEX($A$2:$A$11,MATCH(0,COUNTIF($D$1:D1,$A$2:$A$11&""),0)),"") المعادلة الثانية =SUBSTITUTE(AConcat(IF($A$2:$A$11=D2,","&$B$2:$B$11,"")),",","",1) تقبل تحياتي

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

حياك الله أبشر با الطيب تفضل مشروع البصمة 2 - تجربة 3.rar

اخي ابو ميرال حين تفتح النماذا بواسطة ازرار في نموذج الواجهة واغلاق النماذج بشرط ان يكون نموذج الواجهة مفتوحة ما بها مشكلة ولكن حضرتك عملت كود حين اغلاق النموذج Private Sub Form_Close() [Forms]![الواجهة]![n1].Requery End Sub تمام مو مشكلة بها اذا النموذج الواجهة بيكون مفتوح لكن اذا اغلقت النموذج الواجهة وبعدين اغلقت النماذج الاخرى ذاك الكود ما بيقدر عمل ريكويري النموذج الواجهة وهو مغلق اساساً لذا يظهر الرسالة عندك خيارين 1/ لازم تخلي الواجهة مفتوح و تكدر تعمل minimize 2/ او تحذف الكود ريكويري عند اغلاق النموذج مع تقدير

للمزيد حول الموضوع قم بزيارة الرابط في أول الموضوع لمعرفة كيفية تطبيق الدالة قم بنسخ التواريخ الهجرية في العمود الأول وفي العمود الثاني ضع المعادلة التي تقوم بتحويل الهجري لميلادي .. المعادلة بالشكل التالي =ConvertDate(A1)

أخي الكريم اضغط ملفك وارفقه بالمشاركة .. ليساعدك الأخوة الأعضاء في حل المشكلة إن شاء الله

شكرا استاذ رمهان .. حفظ الله الجميع

وعليكم السلام اخ وائل حقيقة هذا ما اردت قوله لكن ما منعني ان يفهم كلامي بصورة خاطئة اكيد اسلم طريقة هي اعادة تصميم البرنامج بصورة صحيحة وهو ما يؤدي الى استقرار البرنامج بالاضافة الى امكانية تطويره لاحقا دون اي مشاكل لانه مبني على اسس سليمة وانا بخدمتك

انظر هنا

استاذ سليم اشكرك من اعماق قلبي لقت نجحت المعادلة وعملت اتمنى لك التوفيق والنجاح اينما حللت وارتحلت انت وهذا المنتدى الرائع

السلام عليكم و رحمة الله وبركاته مبدع دائما كعادتك جزاك الله خيرا وبارك الله فيك

السلام عليكم و رحمة الله وبركاته استاذنا الكبير بعلمه و مكانته ابو تامر حفظه الله ورعاه تشرفت كثيرا بمروركم الكريم جزاكم الله خيرا فلقد تعلمت على يديكم الكثير و لا انسى فضلكم بارك الله فيكم

السلام عليكم ورحمة الله وبركاته مساء الخير على الجميع اخواني الاعزاء انا بحاجة الى محلل نظم معلومات خلال يومين بإذن الله من لدية الخبر او لدية الاستطاعه او يعرف من لدية مؤهل لذلك التواصل معي على الخاص للتواصل على الجوال شاكر ومقدر

والله يا اخي سعيد انا متلك افضل جمل SQL اشعر انها اسهل و اسرع

تفضل 1. حدد سجلاتك الفرعية من السجل الاول للرئيسي 2. اذهب لاضافة سجل جديد للطالب ثم اضف زيارة ثم حفظ او انقر على اي عنصر من الفرعي محاضرات ثم انقر زر تم ليتم المطلوب حسب فهمي بالتوفيق Students.rar

الاخ ابو نادر شوف المرفق وبه طريقتين 1. في النموذج 1 وحدث عند التحميل وباستخراج القيمة المخزنة في الجدول 2. في النموذج 2 وحدث عند التحميل وهنا يتطلب ابقاء الرئيسي مفتوحا بالتوفيق cccc.rar

نريد مترجم اولا للجملة !

هلا بك استاذ سعيد اولا خليني اوضح المشكلة وبعدين الاقتراح هنا If Not (rs.EOF And rs.BOF) Then اشترطت ان الريكوردست ليست بوضع النهاية ولا بالبداية وهنا الشرط يتحقق بالجملة التالية Do Until rs.EOF ....... rs.MoveNext Loop فالجملة السابقة سببت حتما السجلات في وضع النهاية وهنا لن يتم المرور على الكود الحل : ضع السطر التالي وهو وضع السجلات في البدء دائما ليصبح الكود Private Sub CmdAddtoGroup_Click() Dim rs As DAO.Recordset Set rs = Me.RecordsetClone rs.MoveFirst If Not (rs.EOF And rs.BOF) Then Do Until rs.EOF If rs!Cont_Selct = True Then DoCmd.SetWarnings False DoCmd.RunSQL "insert into tbl_favconn (fav_name,cont_id) values('" & Me.txtGroupSrch & "','" & rs!Cont_id & "' )" DoCmd.SetWarnings True rs.Edit rs!Cont_Selct = False rs.Update End If rs.MoveNext Loop MsgBox "done" rs.Close Set rs = Nothing End If End Sub بالتوفيق

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

تمام ياباشا برافو عليك اهو انت ماشاء الله وماكانت حتخطر على بالي تحياتي

الاخ محمد ممتاز تم تنفيذ الطلب الاول ( الورقة الرئيسية ) وايضا م تنفيذ الطلب الثاني ( البحث باسم الفرع ) لعل وعسي اخد الاخوة يعمل علي الطلب الثالث ( البحث برقم الاقامة ) شاهد المرفق Omar_1.rar

السلام عليكم ورحمة الله وبركاتة تحية طيبة وبعد ,,, مرفق لسيادتك PACK PLANNING بعد التعديل وقفا للمطلوب سابقا و لكن احب ان انوه لبعض الملاحظات وهي كالاتي : 1 - تم العثور علي خطا في معادلة في عمود D في الشيتات الاتية ( c150 - c100 - Manual ) وتم تصحيحها 2 - وقفا للموضوع اعلاه لقد ذكرت انه في شيت - DATA : وهو يحتوى على معلومات عن كل منتج والخط الذى يشتغل عليه وكذلك الطاقة القصوى للخط لكل منتج. و لكن اتضح انه يوجد طاقة انتاج الماكينة في الساعة ولا اعلم عدد الساعات القصوي للماكينة لذلك تم وضع عدد ساعات افتراضية وهي 8 ساعات فقط و يمكنك تغيرها كيفما تشاء حتي لو للصنف الواحد و سوف تلاحظ ذلك في عمود E في شيت DATA 3 - تم اضافة 3 اعمدة في شيت ACTUAL وهم ( F - I - L ) و يتم كتابة فيها الكمية المنتجة الفعلية وفي حالة عدم تساوي الكمية الفعلية مع الكمية المخططة يتم وضعها باللون الاحمر للتنيه انك لم يتم انتاج الكمية المخططة بالكامل اما في حالة التساوي سوف يتم ازالة اللون الاحمر تلقائيا كما في المثال الموجود بالملف 4 - في شيت ACTUAL في عمود D - G - J لو الكمية المخططة اكثر من كمية الطاقة القصوي للماكينة يتم تجاهل الكمية المخططة و وضع الكمية القصوي للماكينة مثال : الكمية المخططة = 100000 و اقصي طاقة للماكينة هي 60000 يتم تجاهل المخططة و هي 100000 و وضع في الخطة كمية الطاقة القصوي وهي 60000 5 - تم اضافة ورقة عمل جديدة وهي باسم Official holidays وموجود فيها الاجازات الرسمية يمكنك تغييرها يدويا كيفما تشاء 6 - يتم تجاهل كل الكميات المخططة في تواريخ الاجازات ( الجمعة و السبت ) و الاجازات الرسمية و يتم تلوينها تلقائيا باللون الرصاصي كما هو موضح الملف المرفق : PACK PLANNING.rar و اتمني ان يكون هذا مفيد و المطلوب

جرب هذا التعديل حساب عدد الساعات salim modifier.rar

وعليكم السلام أخي الكريم ارفق جزء من الملف وليكن 30 صف للإطلاع عليه ..

الله المستعان اخي اسلام ساعود لك ان شاء الله

الاخ محمد ممتاز ربما يمكن لأحد الاخوة مساعدتك اذا قمت بالاتي التخلص من المسافات المزدجة بين الاسماء او المسافات التي في بداية الاسم او نهايته وايضا ينطبق ذلك علي اسماء الاوراق علي سبيل المثال لا الحصر فيوجد الكثير جدا في الورقة المسماة يناير الشركة في الخليه D29 يوجد الاسم محمد انور محمد توجد مسافة مزدوجة بين محمد و انور و توجد مسافة زائده في نهاية الاسم هذا علي سبيل المثال لا الحصر ملحوظة يجب التعديل علي اصل الملف الام الذي يستمد منه ملفك هذه الاسماء

حياك الله اخي الكريم وصدقني كنت افكر الموضوع مجرد sendkey اثناء مداخلتي الاولى . ولكن لم ينجح الامر فهداني الله ان انقر على الزر مرار فنجحت وهنا خطر ببالي تكرار الامر وبوضع الرقم 2 وفعلا وفقنا الله فله الحمد وجل الثناء

أخي الكريم يرجى تغيير اسم الظهور للغة العربية إليك الملف المرفق وقد تم وضع الجداول الثلاثة في ورقة عمل واحدة (جدول البيع - جدول المخزون - جدول الجرد المطلوب) رابط الملف المرفق من هنا

ا

اخواني الاعزاء تحية طيبه ارجو المساعده بتعديل فورم السند المرفق ليقوم بطبع السند بايقونة مستقله لا علاقة لها بالحفظ كما ان تفاصيل السند لا تظهر فيه عند اجراء معاينة قبل الطباعه مع الشكر كلمة السر 111 سند 111صرف وقبض.rar

اذا تريد تريح نفسك من هذه الشغلة كلها ، فالرابط اعلاه فيه برنامج من مايكروسوفت يمكنك انزاله ، وسيقوم بالعملية بطريقة ثانية ، وهذا رابط البرنامج: http://go.microsoft.com/fwlink/?LinkId=263512 اما اذا الجواب عن سؤالك ، فتفضل: 1. . 2. . 3. . 4. . 5. . 6. . 7. . 8. . 9. . 10. . 11. . 12. . 13. . جعفر

ينقل .....

الملف يعمل عندي بشكل طبيعي مثل ما ذكرت من شروط جرب المرفق Book1.rar

يا اخونا الافاضل لا يوجد ولا كود منهم يعمل المطلوب وربما يكون هذا عيب مني شخصيا في التطبيق فرجاء منكم ان تجربوه اولا حتي تعم الفائدة وجزاكم الله خيرا

السلام عليكم انا اواجه مشكله واتمنى منكم الحل عندي بيانات واريد عمل ارتباط تشعبي لها ..كل بيان ينتقل الى صوره معينه..وبالفعل عملت ارتباط لكن المشكله تكمن عندما اريد نقل ملف الاكسل اللذي يحتوي على الارتباط الى جهاز اخر او سي دي يتغير مسار الارتباط ويحدث الخطاء فاالرجاء اريد منكم المساعده...في عمل كيفيه عمل ارتباط للبيانات ويعمل من دون حدوث الخطاء عندي تغيير المسار وشكرا