اذهب الي المحتوي
أوفيسنا

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

  1. kkhalifa1960

    kkhalifa1960

    الخبراء


    • نقاط

      3

    • Posts

      1,688


  2. Ahmos

    Ahmos

    02 الأعضاء


    • نقاط

      3

    • Posts

      76


  3. hanan_ms

    hanan_ms

    03 عضو مميز


    • نقاط

      2

    • Posts

      171


  4. كمال على طارق

    كمال على طارق

    03 عضو مميز


    • نقاط

      1

    • Posts

      199


Popular Content

Showing content with the highest reputation on 05 يون, 2024 in all areas

  1. هل هو طلبك على قدر فهمي 1- تصحيح حذف الصوره من السجل 2-التقاط الصورة مباشر من رقم المقعد 3-امكانية تقلب اذا كانت الصور القديمة =============================== !!!نسية تعديل التقرير حسيت بالرعود 😂 شكله ناسيني @ابو جودي استاذي ❤️🌹🌹 عسى عمره طويل 😇 Ezy any Open Pc1.rar
    1 point
  2. استاذ @ahmed draz المرفق بعد التعديل ومتجرب على أكثر من بارتشن ومن الفلاش . يعمل تمام . 1-1_3.rar
    1 point
  3. تفضل طلبك لتشغيل على اي حاسوب بتقسيم المسار مع تغير صور التقرير مع ازالة مخلفات دوال مو بس رعود حتى شلال 😂 اعتقد تحتاج الا اعادة بنيان الجداول مع Link وين @ابو جودي استاذي ❤️🌹 Ezy any open pC.rar
    1 point
  4. لتجربة الأصناف اختر من الأرقام 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1020 1400 1110 1000 الكاشير.xlsm
    1 point
  5. أخي الكريم بارك الله فيك 1- عندي استعداد وربنا يقدرني ويستخدمني 2- لو ممكن توضح التعديلات المطلوبة أكتر مع أمثلة 3- نعم يمكن وضع نمط للبحث وفي هذه الحالة انت لا تستهدف أرقام الكتب التي تأتي في مواضع متأخرة حاول توضيح المطلوب اكثر مع الذكر الحالات والأمثلة وإن شاء الله سنتمكن من الوصول لحل 4- ولقد حاولت في الكود الحالي ان يتعامل مع المتغيرات فيمكنك استدعائه من أي جدول ومع أي عمودين إذا كان لديك أي استفسار فلا تتردد أخي الكريم بانتظار توضيحك بالتوفيق
    1 point
  6. بارك الله فيك وجعل علمك فى ميزان حسناتك هو المطلوب
    1 point
  7. لقد قمت بتعديل بسيط علي هذه الدالة حتي تتعرف أيضاً علي المسافات بين الاقواس بعد مراجعة طلبك وذلك بإضافة | \s* | للمقطع الأوسط النسخة بعد التعديل بالمرفق Public Function nssjWipeCondition(ByVal fullText As String) As String Dim regex As Object Set regex = CreateObject("VBScript.RegExp") With regex .Global = True .MultiLine = True .IgnoreCase = False .Pattern = "(\d+\s*-\s*\()([\d-/_,\s*\\]+)(\))" End With nssjWipeCondition = regex.Replace(fullText, "$1$3") If Not regex Is Nothing Then Set regex = Nothing End Function Smart_Search_Nssj_V5.zip
    1 point
  8. استاذ @ahmed draz عملت للمرفق اضافة جميله ستعجبك . بعدما تختار مسار فولدر الصور الصحيح (الذي به الصور) سواء فتحت التقرير من النموذج ..... أو أغلقت النموذج ثم فتحت التقرير أو الاستعلام سيعطيك النتيجة . ملحوظة-1 : اذا أغلقت البرنامج ثم فتحته مرةً أخرى فلابد من اختيار مسار مجلد الصور مرة أخرى . ملحوظة-2 : اذا حبيت فتح الصور من المجلد لما يكون بجوار قاعدة البيانات (أي مكان ثابت) . أنا حاضر لأن لها طريقة أخرى . تابع الشرح واليك المرفق . لا تنسى اذا كان هذا طلبك الضغط على أفضل اجابة 1-1_2.rar
    1 point
  9. السلام عليكم ورحمة الله وبركاته أخي الكريم صبحك الله بالخير والنور والسرور تم بحمد الله عمل التعديلات المطلوبة وتم تعديل بعض الأكواد واضافة بعض الاكواد والوظائف الملف بالمرفقات راجعني بعد التجربة بالنتائج والاستفسارات إن شاء الله بالتوفيق Smart_Search_Nssj_V4.zip
    1 point
  10. لا تقلق! إنما هو عتاب محب لأحبابه ومكانتكما عندي عالية علو سهيل.. بداية جيدة وفالٌ حسن.. تسمية الجداول يدل على أن هناك معرفة مكتسبة من ZATCA!.. للأسف الجهاز الذي أعمل عليه لا يوجد به برنامج أكسس لكن.. هل قمتما بقراءة المراجع التي أرفقتها؟ أريد جوابا بنعم أو لا.. لأنه إذا كان الجواب بنعم سوف أقوم باستخدام المصطلحات التي فيها بدلا عن الكلمات والمعاني العربية!
    1 point
  11. وعليكم السلام -يمكنك استخدام هذه المعادلة =IF(COUNTIFS($B$2:B2,B2,$A$2:A2,A2)=1,"Input1 ",IF(COUNTIFS($B$2:B2,B2,$A$2:A2,A2)=2,"Output1 ",IF(COUNTIFS($B$2:B2,B2,$A$2:A2,A2)=3,"Input2 ",IF(COUNTIFS($B$2:B2,B2,$A$2:A2,A2)=4,"Output2 ",""))))
    1 point
  12. السلام عليكم ورحمه الله وبركاته وبها نبدأ تفضل اخي وعليك بالشرح المستفيض حتى يتم فهم مشكلتك بصورة اوضح تصنيع.xlsb
    1 point
×
×
  • اضف...

Important Information