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

السلام عليكم ورحمة الله وبركاته أخي @shatat 🙂 بعد العديد من التجارب قمت بتصميم هذا النموذج ولله الحمد 🙂 : طبعا التقويم دايناميكي يتغير بحسب الشهر الذي يقع فيه التاريخ الذي بالأعلى ( Target Month ) .. وتظهر البيانات بالأسفل وتتغير حسب اسم الموظف والشهر المختار .. كل مشروع يتم تسجيله يحفظ باسم الموظف المختار بالأعلى .. وهذه دعوة للتجربة وإبداء الرأي 😊🌹 TimeSheet Project.accdb

وعليكم السلام-تفضل

فورم عن مناسك الحج بالصوت والصورة والفيديو وكل عام وانتم بخير الفيديو

اقتراحي مشابه لاقتراح أخي الباشمهندس قاسم @Eng.Qassim وفقا لما فهمت من رد حضرتك ان تحديد الفئة العمرية سيكون قاصر علي التحديد اليدوي بالنسبة للمستخدم فاقتراحي ان يكون جدول التحليلات به 4 عمود بعد اسم التحليل وباقي البيانات طبعا 1-2 - القيم الطبيعية لفئة بالغ (ذكر - أنثي) 3-4 - القيم الطبيعية لفئة غير بالغ (ذكر - أنثي) وفي هذه الحالة لن نحتاج الي جدول الفئات العمرية لكونه سيتم تحديده من قبل المستخدم وهكذا يمكن استخراج النتائج الطبيعية بناءا علي تحديد النوع واسم التحليل وبالغ او غير بالغ وفي النهاية هي مجرد اقتراحات لن يحدد جدواها سوي طبيعة ما تريدون القيام به بعد هذه الخطوة.

قليل مما عندكم يا سيدي 😊🌹

وعليكم السلام ضع مسافة ثم underscore Dim a As Integer a = 500 _ + 80 _

تفضل How To Find And Replace Fill Color In Excel?

مبدع دائما استاذ @Moosak

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

كل عام وانتم بخير اللهم اوعدنا جميعاً بحج بيته الحرام -بارك الله فيك استاذ مجدى

وعليكم السلام-يمكنك استخدام هذه المعادلة =IF(AND(DAY(B2)=1,MONTH(B2)=2),"كادر","") كادر.xlsx

يمكنك استعمال هذا الكود لحذف أقدم التكرارات Sub DeleteOldestRepeated() lr = Cells(Rows.Count, 3).End(xlUp).Row For r = 2 To lr If Evaluate("=COUNTIF($C$2:$C$" & lr & ",C" & r & ")") > 1 Then For n = (r + 1) To lr If Range("c" & n).Value = Range("c" & r).Value Then If Range("b" & n).Value >= Range("b" & r).Value Then Rows(r & ":" & r).Delete Shift:=xlUp r = r - 1 Else Rows(n & ":" & n).Delete Shift:=xlUp End If End If 'Exit For Next n End If Next r MsgBox "Done by mr-mas.com" End Sub وإذا كانت احتمالات التكرارات مرتين فقط في الاسم الواحد فيمكن حذف علامة التعليق قبل exit for لتسريع الكود أكثر بالتوفيق

السلام عليكم و رحمه الله و بركاته المساعدة بماكرو يقوم في صفحة Lists في الملف المرفق تختار طباعة فيظهر فورم تقوم باختيار الصفوف بحيث يقوم ماكرو بانشاء صفحة بعدد الاختيار ثم يعبا اسماء الطلبة كل صف في صفحة و شكرا كشوفات الطلبة.xlsm

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

جرب المرفق ...كلمة المرور 123 اضهار شيت الاكسل بكلمة مرر.xls

بدون زر ادخل قيمة في المدى J8:J1000 وسيرحل الى الشيت الاخر باذن الله تحياتي ...الكود في حدث الشيت Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next Dim ws As Worksheet Set ws = Sheets("البيانات") Dim c, x Application.ScreenUpdating = False If Not Intersect(Target, Range("j8:j1000")) Is Nothing Then c = Target.Offset(, -9) x = Application.Match(c, ws.Columns(1), 0) 'Target.Copy ws.Cells(x, 1).Offset(, 19) = Target End If Application.ScreenUpdating = True End Sub ترحيل ارقام من شيت الى شيت.xlsm

تفضل أخي @حامل المسك 🙂 الحاق البيانات.accdb

الحمد لله انك استفدت من المثال تحياتي لاخوتي اهل غزة

السلام عليكم ورحمة الله وبركاته 📜برنامج المخزون والفواتير الشامل الإصدار الرابع 2020 البرنامج هو تحديث للاصدارات السابقة من نفس البرنامج اولا وقبل كل شيئ اعتذر عن التأخير فى اطلاق هذا الاصدار نظرا لانشغالي الدائم وظروف خارجه عن الارادة. كما هو معروف عن برنامج المخزون و الفواتير الشامل: واجهة تطبيقية كاملة علي الاكسيل يصلح لكافة اغراض المبيعات و المشتريات وذمم عملاء وموردين و حساب المصروفات مع ميزانية عامه توضح الربح و الخساره. البرنامج مليئ بافكار جديده فى طريقة ادخال الاصناف داخل الفواتير و استدعائها و التعديل عليها.بالاضافه الي طرق جديده فى تصميم الفاتورة كما يتميز البرنامج بكثرة التقارير وسهولة الحصول عليها فى اى وقت يعمل علي جميع اصدارات الاكسيل بنواتين 32 أو 64 بت ويفضل دائما الاصدارات الاحدث من الاكسيل اوفيس 2019 و 365 البرنامج مجاني بنسبة 100 % للاستخدام الشخصي ولا يوجد به تاريخ انتهاء. وتستطيع استخدامه بامان تام.ويمنع بيع البرنامج او اي ربح تجاري بدون الرجوع الي المالك الاصلي.و الله الشاهد علي ذلك. تم تصميم البرنامج بمواصفات خاصه ويعمل للشركات الصغيره الي متوسطة الحجم او للمشاريع الخاصه .وهو فى الاصل برنامج تجارى ولكنى اقدمه هنا للمنتدى وللأخوة الاعضاء بصورة مجانية. تم اطلاق الاصدار الاول من هذا البرنامج عام 2012.وكل ما يلزم هو وجود نسخة اكسيل علي جهازك.وسيفي بالغرض تماما. هذا هو اخر اصدار للبرنامج علي اكسيل و الاصدار الخامس و لمزيد من التحسينات الكبيره سوف يتم تطويره إن شاء الله بلغة برمجه اخري وقاعده بيانات اخري. الدخول الاول:اسم المستخدم "مدير" و الباسورد 123 تم ارفاق نسختين من البرنامج نسخة الاستخدام المباشر كمستخدم ويمكنك استخدامها فى عملك مباشرة. نسخة اخري للتعلم مفتوحة المصدر وتوجد بها جميع الاكواد لجميع الشاشات داخل البرنامج للتعلم او التعديل عليها كما هو الغرض الرئيسي من هذا الصرح العظيم. يمكنك الرجوع الي الاصدارات السابقة حيث يوجد شرح كامل لكيفية استخدام البرنامج لاول مرة. توجد الروابط للاصدارات السابقة و الشرح اسفل هذا الموضوع . 📑الجديد في هذا الاصدار (2020)SIS Ver.4: شاشة تصميم الفواتير و هي من الشاشات الجديدة وبها الكثير من الاكواد الجديده فى الاكسيل (علي حسب علمي) حيث تمكنك من وضع اللوجو الخاص بالمؤسسه او الشركة الخاصه بك كما يمكنك ايضا وضع بياناتك اسفل الفاتورة كرقم التليقون و العنوان و ...... التحكم الكامل في بعض القيم و ظهورها داخل الفاتورة كرصيد العميل. شاشة اختيار عملة الدولة ووضع الضريبه او القيمه المضافه تمكنك هذه الشاشه من اختيار العمله علي حسب الدوله التي تعمل فيها. كما تمكنك من ضبط قيمة الضريبه او القيمه المضافه لفواتيرك شاشة ضبط صلاحيات المستخدمين بعد اضافة مستخدم جديد للبرنامج تستطيع ضبط صلاحيات المستخدم من الوصول الي جميع شاشات البرنامج شاشة حذف البيانات الغير مستخدمة بكل سهولة تستطيع حذف العملاء و الموردين او الاصناف الغير مستخدمة داخل البرنامج. شاشة الحركة المالية السريعة تستطيع ادخال سند صرف موردين او سند عميل بضغطة زر واحده. شاشة الفواتير الكثير من التحسينات تم ادارجها داخل شاشة الفواتير فاتورة المشتريات . انت من يقوم بوضع رقم الفاتورة الخاصه من المورد.بدلا من وضعها اتوماتيكيا كالاصدار السابق. اضافة خصم اجمالي علي الفاتورة. يتم تحديد الخصم كنسبه مئويه او خصم مبلغ مقطوع. اضافة الضريبه علي الفاتورة ويمكن تحديد قيمتها يدويا او تثبيتها من خلال شاشة البيانات الجديده وضبط الضريبه او القيمه المضافه علي حسب الدولة. مبيعات نقدي: فى حالة اختيار هذا النوع من الفواتير يتم ادراج سند قبض مباشره الي حساب العميل مع حفظ الفاتورة لانها مبيعات نقدية. ظهور رصيد العميل الحالي داخل الفاتورة. و التحكم في ظهوره من خلال شاشة تصميم الفاتورة. زر لسداد كامل الفاتورة مباشرة وادراج سند قبض او سند صرف داخل حساب العميل/المورد سند بالمبلغ المدفوع داخل الفاتورة وتسوية حساب العميل او المورد. شاشة الحركات المالية ادراج الكثير من الحركات المالية داخل سند الصرف. شاشة جديده لحساب رواتب وجميع الحسابات للموظفين العاملين فى المؤسسة او الشركة يوجد الكثير من الاضافات و التحسينات علي كل الشاشات والتقارير داخل البرنامج . تستطيع اكتشاف المزيد و المزيد اثناء استخدام البرنامج. التعامل مع رصيد اول المده (كميات الاصناف- حسابات العملاء/الموردين) تم الاستغناء عن شاشة اكواد البيانات والجرد فى هذا الاصدار وكانت تستخدم لوضع رصيد اول المده للاصناف. وعوضا عن ذلك ولحساب المخزون بطريقه منظمه يجب ان يتم وضع كميات اول المده لجميع الاصناف من خلال فاتورة مشتريات باسعار شراء محدده حتي يتم ادراجها وحسابها بطريقه دقيقه.وايضا فى حالة رصيد سابق للعملاء والموردين يجب ان يتم ادخاله من خلال شاشة الحركات الماليه( حركة ماليه رصيد اول مده او ترحيل لحساب عميل/مورد) طباعة الباركود لا تزال غير مفعله ايضا فى هذا الاصدار. 👁️‍🗨️شرح كيفية استخدام البرنامج وادخال البيانات من الاصدارت السابقة:(برجاء مراجعة الروابط التالية) شرح برنامج المخزون و الفواتير الشامل(مشاركة داخل المنتدى) استخدام البرنامج لاول مره من الاصدار الثالث شرح برنامج المخزون و الفواتير الشامل( ملف تنفيذى... 6MB رابط خارجى على موقع ميديا فاير) 🏷️تحميل البرنامج: النسخة الاولي SIS 4.566EO : هى نسخة المستخدم النهائي مجانيه 100 % لاعضاء المنتدي الكرام وليس لها تاريخ انتهاء وكما ذكر سابقا هي للاستخدام الشخصي فقط. 💳SIS 4.566EO.rar النسخة الثانيه SIS 4 Learning : هي نسخة للمطورين و الباحثين عن التعلم وهي نسخة مفتوحة المصدر تحتوي علي جميع اكواد الشاشات داخل البرنامج. 🧼SIS4(Learning).rar إن شاء الله سوف اقوم بالرد علي استفسارات اعضائنا الكرام عندما يتوفر لي الوقت و اعتذر مقدما عن اي تاخير نظرا لانشغالي الدائم. اخيرا أحب انا أشكر جميع مشرفي و اعضاء هذا الصرح العظيم. واتمني من الله ان يكون هذا العمل خالصا لوجه الله سبحانه و تعالي و انا اكون قد قدمت تجربه جيده لهذا النوع من البرامج علي الاكسيل وان ينفع به جميع اعضاء المنتدي الكرام

تفضل دالة if.xlsx

أخى الكريم لو ممكن رفع الملف بارك الله فيك

معادلة ممتازة استاذنا الكبير وأدت المطلوب على أكمل وجه أحسنت وبارك الله فيك

وهذه أيضا دالة معرفة أخرى تكاد تكون متشابهة مع الدالة الأولى strReverse -2مشكلة الكتابه المعكوسه.xlsm

بارك الله فيك استاذنا الكريم وجعله الله فى ميزان حسناتك

تفضل اخى الكريم وهذا سوف يتم بالدالة المعرفة Reversestr وهى من أعمال استاذنا الكبير وخبيرا ومحللنا المالى الأستاذ محمد الريفى له منا كل المحبة والإحترام جزاه الله كل خير وجعل الله جميع اعماله فى ميزان حسناته مشكلة الكتابه المعكوسه.xlsm

أحسنت استاذ أحمد كود ممتاز-كل عام وانتم بخير حمد على سلامة حضرتك لعله خير نورت منتداك من جديد

تفضل اخى الكريم -طبعا بعد اذن استاذى سليم salim.xlsx

لك ما طلبت deff globale2018-2.xlsx

بارك الله فيك استاذ سليم تمام الأن

كده تمام أتمنى أن يكون هذا هو الذى تريده

تفضل كما فى أول مشاركة البحث.xls

لقد تمت الإجابة من قبل من طرف أستاذنا العلامة زيزو العجوز إمكانية البحث بأي كلمة في الاسم أو برقم.xls

والله أستاذ وليد أنا فتحت الملف مرة أخرى ولكن لم أرى أو أشاهد أى مشكلة فإنه يعمل معى بكل بساطة

تم الحل من قبل excel.rar

جرب هذا excel.rar

جزاك الله كل الخير أستاذنا الغالى وبارك الله فيك حل طبعا رائع وأعتقد هذا هو المطلوب

بارك الله فيك ربنا يزيدك من علمه-فكرة جميلة جداً ومطلوبة فى عمليات كتير ربنا يوفقك ودائما إلى الأمام أستاذنا العزيز

هل ينفع معك هذا الملف ؟ علامات.xlsm

وهذا حل ثالث لإثراء الموضوع برجاء مراجعه معادله VLOOKUP.xlsx

ممكن ترسل الملف لكى يتسنى لنا المساعدة

جزاك الله كل خير وزادك من علمه ووفقك لما يحب ويرضاه

هذا الكود من اعمال الأستاذ زيزو العجوز ولكن أريد معرفة العطل الواقع عليه لأنه لا يقوم بالترحيل السلام عليكم ممكن المساعدة فى اتمام هذا البحث.rar

شكرا جزيلا لك أخى سليم بس أنا عايز صفحة البحث (المرحل إليها) تأخذ البيانات من ورقتين وتبدأ من تحت رأس الجدول الأولى: من ورقة حركة الموردين والثانية: من ورقة حركة النقدية وبارك الله فيك

السلام عليكم ورحمة الله تعالى وبركاته استاذى الجليل ومعلمى القدير >>> جزاكم الله خير الجزاء اولا اعتذر عن تغيبى عن المنتدى وتأخرى فى الرد لشدة مرضى. ثانيا حاولت تلك الطريقة وكنت اعرفها مسبقا ولكن دون جدوى ثالثا الحمد لله رب العالمين الذى تتم بنعمته الصالحات فلله الحمد كما ينبغى لجلال وجهه ولعظيم سلطانه بتفضله سبحانه وتعالى على بالحصول على نتيجة ممتازة لحل هذه المشكلة العويصة فلقد قمت بإزاله برنامج الاوفيس نهائيا واعادة تصطيبه من جديد دون جدوى ولكن هدانى الله بالتفكير فى انه بسبب ازالة الاوفيس واعادة تصطيبه يدل عدم حل تلك المشكله على انها لم تكون مشكلة فى برنامج الاوفيس حيث لو انها كذلك كانت انتهت وتم تلافيها لذلك توقعت ان المشكلة تكمن فى ملفات تسجيل نسخة الاوفيس والتى تتعلق بنظام التشغيل اى فى الريجسترى registry وعلى هذا الاساس بدأت رحلة البحث الطويلة والمضنية على الانترنت ووفقنى الله لوجود الحل فى احد المنتديات الاجنبية وهذا من امانة النقل بعد إذن استاذى الجليل ومعلمى القدير اعرض حل المشكله حتى تعم الفائدة اولا يجب عمل مستخدم جديد من لوحة التحكم Cntrolpanel - على سبيل المثال او كما فعلت انا المستخدم Guest - التغير الى المستخدم الجديد بإسم Guest كما هو موضح فى الصورة الاتية ثانيا بعد الدخول الى النظام عن طريق المستخدم Guest يجب الذهاب الى هذا المسار فى الريجسترى registry [HKEY_CURRENT_USER\Software\Microsoft\Office\15.0\Access\Security] لمن لا يعرف طريق الوصول - الضغط على مفتاحى windows key + R من الكيبورد كما فى الصورة التالية - تفتح النافذة التالية تلقائيا - نكتب المر التالى regedit ثم نضغط على زر الامر OK كما فى الصورة التالية - تفتح نافذة الريجسترى كما فى تلك الصورة اتبع الخطوات فى الصور الذى يتم اختيارها --- : HKEY_CURRENT_USER --- : \Software --: \Microsoft --: \Office --: \15.0 للعلم الرقم 15.0 يدل على اصدار الاوفيس انا اعمل على الاصدار 2013 لذلك رقم الاصدار هو 15.0 وارقام الاصدارات المختلفة كالاتى على ما اعتقد طبعا مفيش رقم 13 لانهم لايحبوا هذا الرقم ويتشائمون منه ☺ اوفيس 2000 09.0 اوفيس 2002 10.0 اوفيس 2003 11.0 اوفيس 2007 12.0 اوفيس 2010 14.0 اوفيس 2013 15.0 --: \Access --: \Security وبعد الوصول الى تلك النافذة يتم تصدير الــ Security يتم عمل تصدير بالضغط بالماوس على Security ثم اختيار الامر Export كما فى الصورى الاتية يتم اختار مكان لحفظ الملف ( مسار ) الناتج عن التصدير وكذلك اختيار اسم له وأخيرا يتم تغير المستخدم الى المستخدم الاصلى ثم الدخول لمسار الملف الذى تم تصديره من الخطوة السابقة والضغط عليه بالماوس وتفعيله وبهذا يتم حل المشكله حل جزرى ان شاء الله اعتذر للاطاله وأرجوا ان يكون فى موضوعى افادة ان شاء الله وهذا رابط خارجى للصور لمن ارادها مجمعه نظرا لكبر الحجم لم استطع رفعها على المنتدى الرابط من هنا

أخي الكريم بما أنك تستخدم أوفيس حديث 2007 أو 2010 اكتب في الخلية i9 طبيب ثم اكتب هذه المعادلة في الخلية i10 =COUNTIFS(D$4:D$25,$I$9,E$4:E$25,G10) ثم انسخ المعادلة رأسياً لباقي المواقع ..... ومرفق ملفك بعد التعديل المعادلة في العمودين الأولين تنفع في أوفيس 2007 و 2010 والمعادلة في العمودين الآخرين تنقع مع أوفيس 2003 وما قبله العد بأكثر من شرط2003-2007.rar

فزورة أخرى: لدينا 100 جنيه نريد أن نشتري بها 100 حيوان من السوق مع العلم بأن سعر الجمل 5 جنيهات وسعر البقرة 1 جنيه وسعر الخروف 0.10 جنيه ( 10 قروش) ويجب أن نشتري من الثلاثة أنواع ....... فكم يكون عدد كل نوع من الحيوانات؟؟!! ....... ملحوظة : الفزورة لها أكثر من حل وأتمنى التوثيق بمعادلات

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

أخي الكريم أبو الحسن أوفيس 2003 لا يقوم بتصدير الملفات بصيغة pdf ولعمل ذلك يمكن التحايل على ذلك بما يلي: تثبيت طابعة وهمية على الجهاز تقوم بحفظ ما تقوم بطباعته بصيغة pdf وأفضل طابعة في هذا المجال في رأيي هي pdf creator لتحميلها http://sourceforge.net/projects/pdfcreator/ واستعملها كطابعة عادية جداً ويمكنك استعمال كود الطباعة العادي معها

جنيهان

ما شاء الله الموضوع ازداد حماساً كما توقعت له بارك الله لكم جميعاً واسمحوا لي بإضافة بسيطة في موضوع المهر والمتوالية الهندسية لحل مثل هذه المتواليات وبثلاثة متغيرات هي: أول رقم في المتوالية (في حالتنا 1 ) الرقم الذي يتم الضرب فيه (في حالتنا 2 ) عدد مرات التكرار ( في حالتنا 30) تكون المعادلة كالتالي: =1*(2^30-1)/(2-1) بصورة أخرى = أول رقم في المتوالية * (الرقم المضروب فيه ^ عدد مرات التكرار - 1) / (الرقم المضروب فيه - 1) العلامة ^ تعني الأُس ويتم كتابتها ب shift+6 وجرب أن تغير طريقة اللغز بأرقام جديد وعدد مرات جديد وطبق المعادلة ستجد بإذن الله الحل صحيح ************** وأود أن أضيف إضافة بسيطة في هذا الأمر وهي أنه يمكنك عملها من خلال مقبض التعبئة fill handle بدون معادلات إلا للجمع فقط وذلك من خلال: اكتب في a1 الخلية الأولى 1 وفي a2 الخلية الثانية 2 ثم حدد الخليتين معاً ثم اسحب مقبض التعبئة بزر الفارة الأيمن إلى الصف 30 ثم اختر من القائمة "اتجاه نمو" growth trend ستجد المتوالية كاملة فقط يلزمك جمعها بـ sum ======== ولا ينقصني سوى دعاؤكم