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

بسم الله الرحمن الرحيم كما تعودنا واستكمالا لشروحات الفورم التفاعلي باضافات بعض الحيل والافكار للوصول لشكل يسهل للمستخدم التعامل مع اليوزفورم النهاردة هانتعلم الذاي نعمل قائمة منسدلة لجميع تبويات الفورم من خلال بعض الاعدات في شيت منفصل بعيدا عن تعقيدات الاكواد وتكرارها باستخدام Class Modules كود واحد ومختصر وقائمة واحدة تتغير حسب التبويب كنت وعد احد الاخوة في موضوع الدرس الأول للفورم التفاعلي الاخ اسامة فوزي واحتياجه لفورم متعدد المهام والوظائف ليطور عمله ففضلت ان تكون الاجابة عامة حتى يستفيد منها الجميع وادعوا الله ان اكون عند حسن ظنه وظنكم في. أطروحتنا النهاردة بسيطة وشيقة اشبه بمغامرة انك تعبر عن قدرتك وتعاملك في التصميم والكود كانك رسام يرسم لوحة وبربط بين تفاصيلها لتعبر عن رؤية بصرية محددة في مخيلة من قام بالرسم وحياكة التفاصيل حياكة متناسقة لتصل الي المتلقي بسهولة ويستطيع ان يتعامل معها ويمكنك تغيير المسميات للقوائم المنسدلة او الرئيسية من خلال شيت الاعدادات بكل سهولة وتضيف كما تشاء من تبويات بكل سهولة اسيبكم مع الملف واي شيء يحتاج لشرح او توضيح لا تتردوا في طلبه والله ولي التوفيق Create Dynamic Drop-Down Menu In Excel Userform الملف بالمرفقات مفتوح المصدر Create Dynamic Drop-Down Menu In Excel Userform Officana.xlsm

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

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

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

عودا حميدا @ابو جودي ايسر طريقة لحفظ حقوق الطرفين نتبع التالي : 1- نجعل شرط لعمل البرنامج ان يكون الانترنت متصلا بالجهاز . ( على الأقل عند فتح البرنامج ) 1- تقسيم البرنامج الى واجهات وخلفية 2- اجعل في الواجهات في محرر الفيجوال _ شرط _ العمل الى تاريخ محدد ( شهر مثلا ) البرنامج يأخذ التاريخ الدولي من الانترنت .. احتياطا فيما لو تم التلاعب بتاريخ الجهاز ، ومن واقع تجربة قليل من يفعل ذلك لانه يلزمه تغيير التاريخ كلما اراد فتح البرنامج ,,, والمثل يقول ( من عاش بالحيلة مات من الفقر ) 3- بعد الشهر سوف يتوقف البرنامج 4- بيانات العميل المدخلة موجودة عنده 5- نرسل له نسخة من الواجهات مفتوحة ,, لصق في المجلد واستبدال

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

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

اعرض الملف الكاتب الذكي لدوال المجال :::: Dloockup وأخواتها 😊 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته يسرني اليوم أن أقدم لكم هذه الهدية المتميزة والرائعة 😊 ( الكاتب الذكي الآلي لدوال المجال في أكسس ) Dloockup, DCount, DMax, DMin, Dfirst, DLast , DSum, DAvg هذه الأسطورة هي عبارة عن أداة صممتها في أكسس ( بفضل الله وحمده ) تقوم بكتابة دوال المجال نيابة عنك بشكل آلي .. وتعطيك النتيجة بشكل مباشر 😉👌🏼 لن يخطيء أحد بعد اليوم في كتابة جملة هذه الدوال إن شاء الله 😁 كل ما عليك فعله هو استيراد هذه الأداة لبرنامجك ثم اختيار الجدول أو الاستعلام المطلوب والحقل المراد وبعدها سترى العجب العجاب 🙂 ✨ ومن مزاياها :✨ 1 - تسهل عليك كتابة أسماء الجداول والحقول ( فقط تختارها من القائمة المنسدلة ) . 2- يحل مشكلة تداخل النصوص عند استخدامها مع الجداول والحقول المكتوبة باللغة العربية . 3- تفحص لك النتيجة مباشرة للتأكد من أنك ستحصل على البيانات التي تريدها . 4 - سهلة الاستخدام فقط اتبع الخطوات الموضحة وتأكد من اختيار نوع البيانات الصحيح . 5 - يمكنك عمل دالة بأربعة 4 معايير بكل سهولة ويسر . 6 - يمكنك عمل تعديلاتك الخاصة على الدالة مباشرة وفحص النتيجة مباشرة بعد التعديل على النتيجة النهائية . 7 - إمكانية الحصول على الصيغة الخاصة بمحرر الأكواد VBA أو الصيغة المستخدمة في الاستعلامات ومنشيء التعبير . 8- إمكانية استخدام الأداة بشكل مستقل من غير الحاجة لنقلها إلى برنامجك . 9- وغيرها الكثير مما سيفتح الله عليكم اكتشافه بأنفسكم إن شاء الله 😅 طريقة الاستخدام : سهلة يسيرة بحمد الله .. فقط قم بسحب النموذج المسمى SmartDomainFunctionsBuilder_F إلى برنامجك عن طريق السحب والإفلات .. ثم قم بفتح النموذج عندك وسوف يقوم هو آليا بالتعرف على الجداول والاستعلامات الخاصة ببرنامجك بدون الحاجة إلى جهد يذكر 🙂 ( مع إمكانية استخدام الأداة بشكل مستقل من غير الحاجة لنقلها لبرنامجك ولكنك ستفقد الكثير من المميزات 😉 ) الأداة تم عمل الكثير من التجارب عليها وتم تلافي العديد من الأخطاء وإصلاحها بحمد الله وفضله... ولكن لا زلت لا أستغني عن آراءكم وملاحظاتكم من خلال استخدامكم لها 😉 الشرح بالتفصيل : 🙂 وهنا قمت بشرح الأداة بشكل مفصل نوعا ما في مقطع فيديو مدته نصف ساعة تقريبا : وأهم من الأداة نفسها 😉 لا تنسوني من صالح دعائكم لي ولوالدي .. ولا تحرموني من آرائكم ومقترحاتكم ونصحكم وإرشادكم 🙂 أخوكم ومحبكم موسى الكلباني 😊 صاحب الملف Moosak تمت الاضافه 05 ماي, 2022 الاقسام قسم الأكسيس  

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

بشركم الله بما يسركم .. وكف عنكم مايضركم .. وثبت يقينكم .. ورزقكم حلالا يكفيكم .. وأبعد عنكم كل شئ يؤذيكم .. وغفر لكم ولوالديكم ولكل المسلمين والمسلمات يوم العرض .. اللهم آمين 🤲

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

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

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

هذه طريقة ربط ال IP بالدالة 🙂 : ' إعطائها رقم الآيدي مباشرة IsIPConnected("192.168.1.110") ' طريقة استخدامها في الاستعلام أو النموذج بحيث تربطها بحقل الآي بي IsIPConnected([IP])

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

هذا تطبيق على الاستعلام ولكن عند فتح الاستعلام انتظر حتى تظهر البيانات ip.mdb

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

أخي @محمد احمد لطفى أحضرت لك دالة تقوم بفحص ال IP Address إذا كان متصل ولا لا .. ويمكن وضعها في الاستعلام 🙂 ولكن كما قال المهندس @ابوخليل أنها بطييييييييئة جدا لأنها تفحص كل IP على حده وتستغرق وقت كبير لحد ما تعطيك ال Response .. لذلك من الأسهل أن تجعلها في نموذج مفرد وليس متعدد لفحص ال IP الذي تريد معرفته فقط .. أو لك أن تجرب أكثر وتعطينا نتيجة تجاربك 🙂 وهذه هي الدالة : Function IsIPConnected(strIPAddress As String) As Boolean Dim objPing As Object Set objPing = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2:Win32_PingStatus.Address='" & strIPAddress & "'") If objPing.StatusCode = 0 Then IsIPConnected = True Else IsIPConnected = False End If End Function

جزاك الله خيرا 🌹 وبارك فيك ممكن شرح الاكواد المرفقة في السلسلة

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

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

فى جدول بيتم انشاؤه باسم Tablex استعلام الالحاق بياخد منه البيانات وبعد مدع بيتمسح الحدول ده بس كده هذا الكود الموجود على زر الامر DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "Tablex", m_strFileName, True DoCmd.SetWarnings False DoCmd.OpenQuery "import_tbl" 'DoCmd.DeleteObject acTable, "Tablex" DoCmd.SetWarnings True txtImportFile = "" MsgBox "Data imported successfully" هذا السطر الخاص بعملية استيراد البيانات من ملف الاكسل الى الجدول Tablex DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "Tablex", m_strFileName, True وهذان السطران لايقاف رسائل تشغيل الاستعلام واعادة مرة اخرى بعد الانتهاء من الكود DoCmd.SetWarnings False DoCmd.SetWarnings True وهذا الكود بين السطرين السابقين السطر الاول لتشغيل استعلام الالحاق السطر الثانى لحذ الجدول DoCmd.OpenQuery "import_tbl" DoCmd.DeleteObject acTable, "Tablex"

بالاذن الأمر بسيط Private Sub Worksheet_Change(ByVal Target As Range)

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

أعتقد أن سبب الخطأ هو أن جهازك يعمل على النواة 32 بت .. والكود معد للنسخة 64 بت .. بالإضافة إلى أن أكواد ال API المستخدمة لفتح مستعرض الملفات لا تفتح عندي على نسخة 64 بت .. ولحل مشكلتك الأولى تابع هنا : هذا والله أعلم

If Leb_1 = 81 or Leb_1 = 69 Then Me.Car_1.Enabled = True Me.Car_2.Enabled = False else Me.Car_1.Enabled = False Me.Car_2.Enabled = True End If

يوجد عندي ملاحظة بسيطه في نظامك هو بدلا من كتابة كلمة شهادة وانت ارسلت تقرير بماده واحده مثل الرياضيات او لغة عربية يتم استبدال مكان كلمة شهادة مع حذف الحاصرتين "" حول الكلمة اكتب me.y1 عشان يرسل التقرير حسب مسمى الذي يظهر في تكست y1

هذا الموضوع يفيدك إن شاء الله 🙂

هذا حل المتيسر من طلبك Private Sub pye_AfterUpdate() If Me.pye = -1 Then Me.pyeDate = Date Else Me.pyeDate = "" End If End Sub اما طلباتك الأخرى فالمنتدى بارك الله فيك للتعلم والبحث عن الحلول البرمجية كان المفترض ان يكون مثالك مكتمل ،، تعمل تقريرك داخل المثال كما تحب ان يظهر واذا صعب عليك تنفيذ شيء تعرضه هنا لمساعدتك هكذا تعلمنا print factur.accdb

تفضلو هذا نموذج على الطريقة التي أخبرتكم بها 🙂 وباب الإبداع فيها مفتوووووووووووووووح لا حدود له 🙂 والطريقة بالمختصر المفيد كالتالي : (1) ترسم المربع بالشكل والألوان اللي تحبها في برنامج الوورد أو الباوربوينت .. ثم تضغط عليه بالزر الأيمن للماوس وتختار حفظ كصورة .. (2) تحفظ الصورة بصيغة ( PNG ) أي بدون خلفية (3) بعدها تستورد الصورة للأكسس من خانة إضافة صورة .. (4) بعدها تنسق مربع النص ليكون في وسط الصورة .. مع ملاحظة أن تجعل لون مربع النص نفس لون الصورة المدرجة .. (5) يمكنك الحصول على لون خلفية الصورة أو ضبط لون مربع النص من خلال إدخال نفس الأرقام في لوح الألوان .. ( يمكنك نسخ كود اللون Hex من الوورد للأكسس مباشرة ) : ملاحظة مهمة :: عليك أن تراقب حجم برنامجك عند استخدام هذه الطريقة فهي تزيد الحجم بسرعة .. استخدمها باعتدال ولا تفرط في استخدامها 🙂 مرفق قاعدة البيانات والصور المستخدمة .. مربعات نصوص دائرية الحواف.accdb الصور المستخدمة.rar

تفضل Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Dim a Dim i&, r& Dim ws As Worksheet, sh As Worksheet Set ws = Sheet1: Set sh = Sheet2 With ws a = .Range(.Range("A10:G10"), .Range("A10:G10").End(xlDown)) End With If Target.Address = "$F$8" Then r = Sheet1.Cells.Find(Target, , , 1).Column With CreateObject("scripting.dictionary") For i = 1 To UBound(a) If a(i, 1) = sh.Cells(8, 5) Then If Not .exists(a(i, 1)) Then .Add a(i, 1), a(i, r) Else .Item(a(i, 1)) = .Item(a(i, 1)) & "|" & a(i, r) End If: End If Next a = Split(.items()(0), "|") With sh.Cells(10, 6) .Resize(Rows.Count - .Row + 1).ClearContents .Resize(UBound(a) + 1) = Application.Transpose(a) End End With End With End If End Sub رزان2.xlsm

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

ههههههههه سامحك الله اخي @حمدى الظابط .. فهاذا سؤ ضن منك بما أنك قلت هذه العبارة استوجب عليا الرد .. وحتى تعلم الفرق بين أنسان يبحث عن البرامج الجاهزة الموجودة بالانترنت وما اكثرها وبين أنسان له منذو عام 2016 عضوا يسأل ويناقش ويشارك ويبحث في هذا المنتدى العريق فأرجو أن تتقبل ردي هذا بحسن نية وسعة صدر كم استفدنا من الملفات النهائية الذي يهديها اساتذتنا واعظاء المنتدى مثل ( ابانا الغالي @jjafferr و @صالح حمادي و @Shivan Rekany و @ابو جودي و @Moosak و @ابوخليل و @أ / محمد صالح و @ابوآمنة ........الخ .. وغيرهم الكثبر فالقائمة تطول ) ولديهم ملفات أكثر تعقيدا بالاكواد .. ( ابحث عن برامجهم وملفاتهم الذي اهدوها لنا في المنتدى وانظر بنفسك ) كم أستفدنا منها .. وليس شرطا أننا قمنا بعمل نسخ ولصق لملفاتهم وانما عرفنا طريقة عمل الاكواد وطريقة البناء السليم للملفات .. أسأل الله أن يجعلها لهم ذخرا وثواباً يوم القيامة وأن يدخلهم جنته الفردوس الأعلى .. وأسأل الله أن لا ننساء هذا لهم وأن نشهد لهم يوم القيامة بما قدموه لنا من المساعدة وضحو من اجلنا أثمن اوقاتهم .. فجزاهم الله عنا وعن جميع المسلمين كل خير .. للعلم اخي واستاذي حمدي ليس ملفك بالضبط هو مانريدة ونكتفي به .. وانما نريد الاطلاء على الاكواد والاستعلامات ووووالخ حتى نستفيد في طريقة عملها ونقوم بتعديلها في برامجنا .. فليس مجالي برامج المدارس .. ولا احب ان ادخل فيه .. وانما مجالي أمراً أخر .. فأكبر غلطة نرتكبها نحن العرب أننا نكرر نفس الاخطاء ونعيد نفس التجربة كل مرة في الاخطاء ويضيع عمر الانسان في ذلك . وكلامي هذا لا يقلل من احترامي لك ولا من همتك العالية في وصولك الى النتيجة .. كما لك الحرية في ان تضع ملفك او لا ونصيحة لك: أن تكون لك دعوة في ظهر الغيب خير لك من كنوز الدنياء وعلى العموم أكرر شكري واحترامي لك وشكرا على الروابط ...

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

بارك الله فيك استاذ ضاحي

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

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

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

وعليك السلام ورحمة الله وبركاته ياباش مهندس @ابو جودي 🙂 شكرا جزيلا لك .. حاجة دسمة ما شاء الله .. 🌹 شغال معاي وأنا نواتي 64 .. وكل أدرى بنواته 😄

يعمل على نواة X32

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

عليكم السلام ورحمة الله وبركاته خذها نصيحة من اخوك لا تستخدم خاصية الضغط عند الإغلاق .. وقد كنت استخدمتها في السابق مررت بتجارب تلف لقاعدة البيانات ، واكتشفت اخيرا ان هذه الخاصية كانت السبب

عرفت هذه المعلومة من زميل ، و لم اكن اعرفها سابقا و يبدو أن الاوفيس مازال يخبىء لنا الكثير فى دهاليزه عند كتابة تاريخ في نهاية السطر قد يأتي منقسما فيأتي اليوم فى سطر و باقي الشهر و السنة فى الشهر التالي ، و هذا و ان كان مقبولا ، الا انه ليس وضعا مثاليا و الحل المعتاد قد يكون التغيير فى المسافات او المحاذاة او حجم الخط او خليط بينها و لكن الحل السليم هو اختيار المسافة التالية لمحل الفصل ( بعد ال 28 فى هذه الحالة) ثم ضغط مايلي Ctr+Shift+Space فيصبح الوضع كالتالي:

بالنسبة للتواريخ فهي عبارة عن أرقام تسلسلية ، بالتالي يجب أن تغير في المعادلة بهذا الشكل لتنسق التاريخ كما تريد : =TEXT(D2,"yyyy/mm/dd")&CHAR(10)&TEXT(D3,"yyyy/mm/dd") yyyy هو اختصار للعام أو السنة mm هو اختصار للشهر ، مع العلم إذا كتبت mmm أي ثلاثة مرات فإن الشهر يظهر بالحروف (يناير ، فبراير ، وهكذا ..) dd هو اختصار لليوم يمكنك ترتيب التاريخ بالشكل الذي يحلو لك

أخي الحبيب شكيب عمار مرحباً بك في منتدانا الحبيب .. إليك خطوات العمل : **************** 1- حدد الخلية F2 ، أي انقر فيها بالماوس دبل كليك ، وقم بوضع المعادلة التالية : =SUBSTITUTE(D2&" "&D3," ",CHAR(10)) أو هذه المعادلة : =D2&CHAR(10)&D3 حيث أن Char(10) تحل محل Alt + Enter من لوحة المفاتيح. 2- قم بعمل كليك يمين على الخلية F2 واختر الأمر Format Cells ثم اذهب للتبويب Alignment ستجد اختيار اسمه Wrap Text ضع بجانبه علامة صح. 3- يمكن تنسيق الخلية بمحاذاتها ناحية اليمين أو توسيط. * ملحوظة : إذا أعطتك المعادلة خطأ قم باستبدال الفاصلة في المعادلة , بفاصلة منقوطة ; عن طريق حرف الكاف عندما يكون اتجاه الكتابة باللغة الإنجليزية. تقبل تحياتي