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

يمكن الاختصار ليكون Expr1: [A1] & [A2] & [A3] & [A4] & [A5] & [A6] وبالنسبة للصفر مثل ما اشار اساتذتنا الافاضل بتحويل a4 الى نص

كل عام و جميع اعضاء المنتدى والفريق الاداري والفني بالف خير

غير الحقل من رقم الى نص

الأمر بسيط تم التعديل على الملف واستخدام هذه المعادلة =IF(F4="","",(TODAY()-F4)+1)

جرب هذا الماكرو Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False Dim add_ro As Long Dim son As Long Dim Match, cont% son = Cells(Rows.Count, "A").End(xlUp).Row If Intersect(Target, Range("A9:A" & son + 1)) Is Nothing Or _ Target.Count > 1 Then GoTo ExiT_me On Error Resume Next Match = Application.Match(Target, Sheets("sheet2").Range("A:A"), 0) If Match = 0 Then Target = vbNullString: GoTo ExiT_me On Error GoTo 0 cont = Application.CountIf(Sheets("sheet1").Range("A9:A" & son), Target) If cont = 1 Then '============================= Cells(Target.Row, 2) = Sheets("sheet2").Cells(Match, 2) Cells(Target.Row, 3) = Sheets("sheet2").Cells(Match, 3) '========================= Else add_ro = Application.Match(Target, Sheets("sheet1").Range("A:A"), 0) Cells(add_ro, 3) = Cells(add_ro, 3) + Sheets("sheet2").Cells(Match, 3) Target = vbNullString End If ExiT_me: Application.EnableEvents = True End Sub الملف مرفق RAHARAT.xlsm

جرب هذه الطريقة وكل عام وأنتم بخير حساب العمر.accdb

اتفضل من ابداعات الاخت زهرة حساب العمر بالسنة.accdb

السلام عليكم اساتذتى واخوانى -أقدم لكم هذا البرنامج وهو من برمجة وتصميم استاذنا الكبير / سامى محمد على وصور وشرح البرنامج داخل ملف الإكسيل وهناك نموذجان للبرنامج أحدهما يصلح لمدارس البنين والأخر لمدارس البنات واسم المستخدم للبرنامج : admin وكلمة السر : 123 يا رب ينال اعجابكم -جزاكم الله كل خير BOY.rar GIRL.rar صور وشرح البرنامج.docx

فورم بحث وانتقال للاسم المختار الفيديو الصور

فورم يتحرك كيفية ايقاف

لدي ستة حقول اريد دمجهم في حقل واحد 1 حقل متكون من رقمين 2حقل متكون من رقمين 3حقل متكون من خمسة ارقم 12360 4حقل متكون من ثلاثة ارقام 5حقل متكون من رقمين 6حقل متكون من رقمين اريد دمج الحقول باجراء وحدة نمطية و قمت بدمجهم في الاستعلام ولم يظهر الرقم صفر كما هومبين اعلاه ان الصفر على اليسر لم يظهر في الاستعلام مثل 10 98419016665000 قاعدة بيانات1.rar

المفروض يكون عنده تنسيق ثابت للحقل

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

وإذا لم يرد تحويل نوع الحقل كما اشرت نظيف الصفر الى الكود مباشرة

ليس هناك حاجة لوحدة نمطية استخدم التالي في الاستعلام Expr1: [a1] & "" & [a2] & "" & [a3] & "" & "0" & "" & [a4] & "" & [a5] & "" & [a6]

غير الحقل رقم 4 بالجدول الى مربع نص ليظهر الصفر ::بالتوفيق::

شوف هيك طلبك ؟؟

تفضل ::بالتوفيق:: 3Kaser906.rar

حساب الصندوق.xlsx

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

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

لا يوجد اي حل الا مربع التصفية

لم افهم ماذا تقصد انت لو اضفت الموظفين بشكل منتظم في كل شهر راح يطلع لك الاقدم فالاقدم ولو تم الترحيل بشكل منتظم في كل شهر مارا تدخل في هذي الدوامه

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

سبق و قلت لك لا يمكن للخلية ان تكون في نفس الوقت مصدراً للبيانات( لترحيلها الى شيت data ) ومرجعاً لاستقبال البيانات من شيت اخر لذا عليك ادراج جدول اخر مماثل (بدون معادلات ) اسفل الجدول الحالي تقوم بتعبئته بما تريد ، الجدول المستحدث يكون مصدراً للبيانات التي تنوي ترحيلها الى اي شيت تريدها

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

والله استاذنا انه لشرح واضح ومفيد لما تفضلت به رحم الله والديك في الدنيا والاخره

في حقل a1 جعلنا حدث بعد التحديث a2 = Year(Date) - [a1] في a2 ايضا حدث بعد التحديث a1 = Abs([a2] - Year(Date)) استخدمنا دالة abs لابعاد القيمة السالبة

جرب المرفق وكل عام وانت طيب حساب العمر بالسنة(1).accdb

اهلا بك فى المنتدى-تفضل لك ما طلبت استخراج كل البيانات من الرقم القومى.xls فكان لزاما عليك من البداية استخدام خاصية البحث فى المنتدى فهناك العديم من الموضوعات التى ناقشت هذه الجزئية ومنها : دالة استخراج بيانات الرقم القومي (المحافظة والنوع وتاريخ الميلاد) وايضا دالة جديدة لاستخراج اسم المحافظة وتاريخ الميلاد والنوع من الرقم القومي المصري

بالتوفيق اخي qathi نحن في الخدمه بما نستطيع

بارك الله فيك أستاذ إبراهيم عمل رائع وهذا فيديو لشرح الطريقة https://www.youtube.com/watch?v=aLCCxoVDRfo وهذا أيضا موقع به شرح الطريقة https://www.extendoffice.com/ar/documents/excel/2439-excel-drop-down-list-search.html

شوف هذا لعله يكون طلبك InvoiceSale_2 (2).accdb

تم التعديل على المعادلة والملف السابق

وعليكم السلام-تفضل يمكنك استخدام هذه المعادلة =IF(AND(C1="",D1=""),"",IF(C1=D1,"متزن","غير متزن")) دالة if بأربع شروط.xlsm

وعليكم السلام-تفضل رواتب موظفين شهر 8.xlsx

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

من خصائص مربع النص طبق هذه الخصائص :::::: محاذاة النص ............. توزيع اتجاه القراءة ............. اليمين لليسار الهامش الايسر .......... 1 سم الهامش العلوي ........ 0.199 سم الهامش الايمن ......... 1 سم الهامش السفلي ....... 0.199 سم تباعد الاسطر .......... 1 سم

بارك الله فيك وجزاك الله كل خير

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

شكرا لك استاذى الكريم انا أوضحت فى المشاركة الأولى ان هذا العمل ليس من تصميمى فهو من تصميم استاذنا الكبير / سامى محمد على له منا كل الحب والإحترام والتقدير بارك الله فيك

تفضل اخى الكريم لك ما طلبت book1-1.xlsx

بارك الله فيك وجزاك الله كل خير وهذا هو الملف مرفوع هنا لإكتمال الفائدة Rest vba.xlsm

تفضل اخى الكريم-ولكن اذا لم تكن هذا المقصود فعليك رفع ملفك تجنبا لمضيعة الوقن حتى لو ممكن رفع 20 صف مثلا جزاك الله كل خير Dublication.xlsx

اهلا بك اخ كريم فى المنتدى-من الأفضل رفع الملف للعمل عليه بارك الله فيك

اتمنى ان تجدى ما تريديه فى هذا الرابط : وهو برنامج حضور وانصراف للطلاب والطالبات بالأكسيس : https://www.officena.net/ib/topic/84643-برنامج-الحضور-والإنصراف-والمخالفات-للطلاب/ ولكم جزيل الشكر

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

اهلا بحضرتك فى منتدانا الكريم السؤال غير واضح لو ممكن تدعيم لسؤال حضرتك برفع ملف اكسيل وشرح ما تريده بالتفصيل بارك الله فيكم

تم تعديل العنوان للدلالة على المضمون اخي سمير .. تفضل تم التعديل كما تحب sscc12.rar

بضغطة زر واحدة : يتم تعديل المراحل فقط بغض النظر عن الشعب وذلك باستخدام استعلام التحديث تبدأ بالمراحل العليا ثم الدنيا زيادة في الايضاح : لنفرض ان المرحلة هي المتوسطة فقط وهي ثلاث صفوف 1- اولا يتم حذف الطلاب المتخرجين في الصف الثالث 2- نعمل استعلام تحديث للصف الثاني ( تحديث الى : "الصف الثالث" ) وفي حقل المعايير نضع : "الصف الثاني" ثم نشغل الاستعلام يتم من خلال العملية السابقة استبدال الكلمة الصف الثاني بالكلمة الصف الثالث ثم نكرر هذه العملية لتحديث الصف الاول