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

اخي الحبيب وفقك الله يكفي منك عند عدم حصولك على مطلوبك ، فقط كتابة كلمة : للرفع وعند حصولك على الاجابة الشافية تؤشر امامها كأفضل اجابة الجميع هنا طلاب علم .

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

سبق وقلت لك ان الجدول لا يتناسب مع المعطيات لقد وضعت لك جدولا يحدد الأساتذة الغائبين مع عدد ايام الغياب لكل منهم في العامود الاول السؤال: كيف تريد ان توزع ايام الغياب (التواريخ) في صف واحد لو اخذنا مثلاً الاستاذ باري عامر عنده 6 غيابات في تواريخ مختلفة كيف تدرج هذه التواريخ في الصف السادس وفي خلية واحدة ( (A6 ملاحظة :لم احذف الصفحات الباقية بل فقط اخفيتها حتى اتعامل مع الصفات المطلوبة مؤقتاً يرجى اعادة تصميم الجدول اذا كنت تريد تواريخ كل الغيابات للغائبين مع العلم انه يمكن ان يكون هتاك اكثر من مرة غياب فب في شهر واحد الشرح اكثر وضوحاً في الملف المرفق الكود Option Explicit Sub fil_name() Dim p As Worksheet, t As Worksheet, G As Worksheet Dim x%, m%, how_many% Dim resl As Range, r% Set p = Sheets("P"): Set t = Sheets("T") Set G = Sheets("GHIAB") Set resl = G.Range("a5").CurrentRegion r = resl.Rows.Count If r > 1 Then resl.Offset(1).Resize(r - 1).ClearContents x = 4: m = 6 Do Until p.Range("a" & x) = vbNullString how_many = Application.CountIf(p.Range("D" & x).Resize(, 222), "Ok") If how_many > 0 Then With G.Cells(m, 1) .Value = how_many .Offset(, 1) = p.Cells(x, 1) .Offset(, 2) = p.Cells(x, 2) .Offset(, 3) = p.Cells(x, 3) m = m + 1 End With End If x = x + 1 Loop End Sub الملف مرفق (تم تغيير اسم صفحة الغائبين الى GHIAB) لسهولة التعامل مع اللغة الاجنبية من حيث نسخ الكود ولصقه medSalim.xlsm

وعليكم السلام-فقط يمكنك استخدام هذا الكود بحدث الصفحة وكلمة السر عند الحاجة هى 123 Private Sub Worksheet_Change(ByVal Target As Range) Dim xRg As Range On Error Resume Next Set xRg = Intersect(Range("C6:G8"), Target) If xRg Is Nothing Then Exit Sub Target.Worksheet.Unprotect Password:="123" xRg.Locked = True Target.Worksheet.Protect Password:="123" End Sub اقتراح موعد لاجتماع شرح التقرير الشهري1.xlsm

تفضل هذا هو المطلوب بالفعل-جرب بنفسك الكمبوبوكس1.xlsm

أ @محمود ادريس افضل اجابه توضع لمن اجابك وهو الاستاذ @صلاح جبر جزاه الله خيرا تمنياتى لكم وللجميع بالتوفيق

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

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

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

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

وعليكم السلام-اهلا بك فى المنتدى , فقط بهذه المعادلة =IFERROR(VLOOKUP($A2,Sheet1!$A$2:$B$900,2,0),"") معادلة جلب اسم المحافظة.xlsx

اليكم الدرس التاسع لشرح برنامج الاكسيل من الرابط التالى https://youtu.be/khRj307MPug ملف شرح الدرس التاسع لشرح الاكسيل.rar

وعليكم السلام ورحمة الله وبركاته هل تريد استدعاء البيانات من الاكسل الى الاكسس ؟ ام العكس

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

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

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

عليكم السلام ورحمة الله و بركاتة تفضل اخى الكريم لك ما طلبت Copy of With Holding Tax_The _2019.xlsm

ما عملنا شي لك عزيزي بخصوص السوال الثاني احذف الكود التالي DoCmd.RefreshRecord من زر الحفظ وجرب

ربما يكون الحل Result.xlsx

نفضل اخي الكريم بعض المواضيع في المنتدى https://www.officena.net/ib/topic/71690-ترجمة-وكتابة-الاسماء-من-العربية-الى-الانجليزية-تلقائيا https://www.officena.net/ib/topic/87360-%D8%AA%D8%B1%D8%AC%D9%85%D8%A9-%D8%AC%D9%88%D8%AC%D9%84-google-translate/ تحياتي

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

وعليكم السلام ورحمة الله اليك المثال بعد التعديل Library.rar

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

My_formula.xlsx

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

وعليكم السلام تفضل مثالك بعد التعديل اطفال.rar

وعليكم السلام-تفضل دالة dcountA شرح الدالة DCOUNT

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

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

السلام عليكم لو جربتموها و قمتم بالعمل عليها لوجدتم خلاف ذلك المصفوفات تسهل علينا الكثير من المسائل و تختصر الكثير من الأكواد

بارك الله فيك استاذ محمد وجزاك الله كل خير مبارك الترقية أستاذ moneer saad ان شاء الله مستحقة وعن جدارة

ارجو عمل معادلة للطباعة ويومية مبيعات كما هو فى اليومية وعمل شيت بحيث يتم طباعة اكتر من ٥٠ فاتورة فى وقت واحد وترحيلها الى يومية مبيعات وشكرا لكم فواتير٣٣٣(1).zip

أستاذ Ahmed 70 أين الضغط على الإعجاب ؟!!💙

تفضل كود لأحد اساتذة هذا المنتدي الجميل فواتير٣٣٣.xlsm

السلام عليكم-يمكنك استخدام هذه المعادلة =SUBTOTAL(9,$J$2:$J$63) المعادلة بسيطة جدا كما ترى غير محتاجة الى شرح فقط عليك بعد كتابة = تكتب اسم المعادلة Subtotal ثم بعد ذلك تقوم بفتح قوس , وبما انك تريد اجمالى فعليك بعد فتح القوس كتابة رقم 9 ثم علامة الكومة المناسبة لجهازك سواء عادية او منقوطة , ; ثم بعد ذلك كتابة النطاق او العمود الذى تريد الإجمالى منه وفى حالتك هو $J$2:$J$63 ثم بعد ذلك تقوم بغلق القوس , وبارك الله فيك Subtotal.xlsx

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

فقط عليك استخدام هذه المعادلة =MIN(A2:B2) تواريخ1.xlsx

وعليكم السلام -تفضل حافز 2العملاء.xlsx

تم تغيير اسم الورقة الاولى الى "DATA_BASE" لحسن التعامل مع المعادلات باللغة الاحنبية المعادلة المطلوبة في الخلية G2 يلزمها (Ctrl+Shift+Enter) وليس (Enter) وحدها لانها معادلة صفيف =IF(A2="","",INDEX(DATA_BASE!$C$2:$C$50,SMALL(IF(DATA_BASE!$C$2:$C$50<>"",IF(DATA_BASE!$A$2:$A$50=$A2,ROW($C$2:$C$50)-ROW($C$2)+1)),COUNTIF(DATA_BASE!$A$2:A2,A2)))) الملف مرفق للمعاينة SALIM_VLOOKUP.xlsx

اعرض الملف تحويل المعدل الى تقديرات نصية باستخدام IF تحويل المعدل الى تقديرات نصية باستخدام IF نموذج ملف معدلات طلاب وتحويل المعدل الى تقدير اقل من 50 راسب 50 - 60 مقبول 60 - 70 متوسط 70 - 80 جيد 80 - 90 جيد جدا 90 - 100 امتياز صاحب الملف ahmad3a تمت الاضافه 12 يول, 2019 الاقسام قسم الإكسيل

تفضل بعد اذن الأستاذ عماد يومية1.xlsx

اهلا بك فى المنتدى تفضل استحقاق الترقية#1.xlsm

تفضل اخى الكريم محمد اعمال يومية3.xlsm

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

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

وعليكم السلام -تفضل اخى الكريم ترحيل.xlsm

وعليكم السلام تفضل Report.xlsm

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

ليه بتكرر هذه الجملة في خانة الرسوم عايز اذا دخلت 8 أو 16 يتغير اللون استاذى العزيز اذا كنت تريد الحل بجد فموضوعك سهل جدا ولكن انت غامض فى التوضيح اريد عندما تقوم بالتوضيح لا تقوم بتغيير كلامك فى كل مشاركة اريدك عند الشرح مفترض ان تقول هكذا عشان نقفل الموضوع ده وننهيه لأنه كده زاد عن الحد المبلغ التوزيع الرسوم الإستقطاع اكتب فقط فى هذا العمود الأرقام المطلوب تغيير لون الصف عند ادخالها اكتب فقط فى هذا العمود الأرقام المطلوب تغيير لون الصف عند ادخالها اكتب فقط فى هذا العمود الأرقام المطلوب تغيير لون الصف عند ادخالها اكتب فقط فى هذا العمود الأرقام المطلوب تغيير لون الصف عند ادخالها

اخي الكريم راجع هذا الرابط قد يفيدك https://support.microsoft.com/ar-sa/help/2581301/acc2010-you-receive-an-error-in-microsoft-access-using-the-built-in-wi