اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

  1. ابو جودي

    ابو جودي

    أوفيسنا


    • نقاط

      46

    • Posts

      7227


  2. Ali Mohamed Ali

    Ali Mohamed Ali

    المشرفين السابقين


    • نقاط

      23

    • Posts

      11643


  3. kha9009lid

    kha9009lid

    الخبراء


    • نقاط

      8

    • Posts

      1347


  4. ابو ياسين المشولي

    • نقاط

      4

    • Posts

      1755


Popular Content

Showing content with the highest reputation on 09/20/19 in مشاركات

  1. اتغضل تم عمل الاتى وضع الكود داخل موديول لسهولة استدعاءه فى زوايا البرنامج المختلفة ( نماذج - استعلامات - تقارير ) التعديل على الكود لعرض التاريخ فقط بالتنسيق الذى طلبته ظهور الرسالة الاتية عند عدم وجود الانترنت ويتم احضار الوقت بنفس التنسيق المطلوب من الحاسوب GetNetTime.mdb
    3 points
  2. عجبنى الموضوع ده قلت أشاركه معكم بإختصار هو سكريبت لعمل مكان موثوق لملفات الأكسيس من مكان تشغيله .. بمعنى لو شغلته من Desk Top تقدر تفتح أى ملف أكسيس على Desk Top بدون ظهور Enable Content. ولو عندك فولدر لمشاريعك فى أى مكان سواء سى أو دى أو .... ضع هذا السكريبت داخله وشغل وخلاص بقى كل ما بداخل الفولدر منطقة أمان. إنشئ ملف نص بأى إسم وضع فيه ما يلى على أن تغير إمتداده الى vbs. Const HKEY_CURRENT_USER = &H80000001 Dim oRegistry Dim sPath Dim sDescription Dim bAllowSubFolders Dim bAllowNetworkLocations Dim bAlreadyExists Dim sParentKey Dim iLocCounter Dim arrChildKeys Dim sChildKey Dim sValue Dim sNewKey Set WshShell = CreateObject("WScript.Shell") strCurDir = WshShell.CurrentDirectory Set oRegistry = GetObject("winmgmts:\\.\root\default:StdRegProv") sPath = strCurDir sDescription = "YourTrustedLocationDescriptionGoesHere" bAllowSubFolders = True bAlreadyExists = False sParentKey = "Software\Microsoft\Office\16.0\Access\Security\Trusted Locations" ' sParentKey = "Software\Microsoft\Office\16.0\Excel\Security\Trusted Locations" ' sParentKey = "Software\Microsoft\Office\16.0\PowerPoint\Security\Trusted Locations" ' sParentKey = "Software\Microsoft\Office\16.0\Word\Security\Trusted Locations" iLocCounter = 0 oRegistry.EnumKey HKEY_CURRENT_USER, sParentKey, arrChildKeys For Each sChildKey in arrChildKeys oRegistry.GetStringValue HKEY_CURRENT_USER, sParentKey & "\" & sChildKey, "Description", sValue If sValue = sDescription Then bAlreadyExists = True If CInt(Mid(sChildKey, 9)) > iLocCounter Then iLocCounter = CInt(Mid(sChildKey, 9)) End If Next 'If bAlreadyExists = False Then sNewKey = sParentKey & "\Location" & CStr(iLocCounter + 1) oRegistry.CreateKey HKEY_CURRENT_USER, sNewKey oRegistry.SetStringValue HKEY_CURRENT_USER, sNewKey, "Path", sPath oRegistry.SetStringValue HKEY_CURRENT_USER, sNewKey, "Description", sDescription If bAllowSubFolders Then oRegistry.SetDWORDValue HKEY_CURRENT_USER, sNewKey, "AllowSubFolders", 1 End If كما يمكن تفعيله للاكسيل والوورد والباور بوينت مع مراعاة نسخة الاوفيس لديك وتغيرها فى الكود: أوفيس 2019 : 16.0 أوفيس 2016 : 16.0 أوفيس 2013 : 15.0 أوفيس 2010 : 14.0 أوفبس 2007 : 12.0 أوفيس 2003 : 11.0 أظن أنه لا يوجد أحد أعضاء منتدانا الكريم يعمل على أوفيس XP 😊 عسى أن يفيد .. إذا اشتغل يعنى والله الموفق EAR TrustAnyWhere.zip
    2 points
  3. باى برنامج لضغط الملفات انا عن نفسي اقضل برنامج 7zip https://www.7-zip.org/ طبعا الافضل الضعط بامتداد .zip
    2 points
  4. اخوك @عبد اللطيف سلوم يا سيدى اول لما بتيجى سيرة الدفع هو يختفى
    2 points
  5. اتفضل اهلا اهلا استاذى الجليل ومعلمى الاستاذ @essam rabea حبيبى انا كلى لك بس اللى يدفعونه لى انا Open Folder.zip
    2 points
  6. تسلم اخي ابا جودي بالتوفيق اخي عبداللطيف
    2 points
  7. الحمد لله انحلت المشكلة عندك اللهم لك الحمد وجزاكم الله تعالى عنى كل خير نظير دعواتكم الطيبة واسأل الله تعالى ان يرزقكم مثلها واكثر اضاعفا مضاعفة يارب العالمين
    2 points
  8. هههههه حبيب البي @ابا جودى المهم النتيجة وصاحب الموضوع وجد طريقتين تؤدي الغرض بخصوص استفسارك تريد اجابة ادفع اول نفس طريقتك مع حبيبنا @عبد اللطيف سلوم
    2 points
  9. الله يسعدك يااستاذنا الغالي جميل جداً وهذا المطلوب الف شكر
    2 points
  10. وعليكم السلام -اهلا بك ونورتنا بالمنتدى تفضل
    2 points
  11. هل هناك مكتبات مفقودة . راجع محرر الاكواد Tools->References وعلى كل جرب المرفق الاتى GetNetTime.mdb
    2 points
  12. جرب المرفق اشهر.accdb
    2 points
  13. أحسنت استاذ مجدى كلها أعمال رائعة جعلها الله فى ميزان حسناتك
    2 points
  14. بارك الله فيك استاذ مجدى وزادك الله من فضله
    2 points
  15. اقدم لكم برنامج من خلاله تستطيعون تفعيل او الغاء الشفت لبرامجكم . Shift.rar
    1 point
  16. السلام عليكم ورحمة الله وبركاته جمعت كل اوراقي القديمة ومشاريعي وجعلتها في برنامج اسميته محاسبة 71 كل معرفتي بالاكسيس حاولت ان اضعها فيه نتمتى من الاخوة ابداء الراي برنامج محاسبة ومستودعات.rar
    1 point
  17. التعرف على عدد السطور التى بها بيانات من خلال الفورم فيديو2 الفيديو
    1 point
  18. واخيرا اللهم لك الحمد يارب لك الحمد حمدا كثيرا طيبا طاهرا مباركا فيه يارب لك الحمد كما ينبغى لجلال وجهك ولعظيم سلطانك
    1 point
  19. انا اسف عاجز عن تقديم المساعدة على الرغم من اننى كنت اتمنى ذلك
    1 point
  20. أخي جرب التعديل عملت لك على حسب مسافة سفلية في الصفحة لا على عدد اسطر بمعنى لو قمت بنقص او زيادة ارتفاع عناصر في صفحة وعدد اسطر 37 ، يرجع نفس مشكلة سابقة فلهذا عملت الكود يزداد ارتفاع الآلي بعد وصول سجلات الى نقطة محددة في صفحة مهما كان ارتفاع عناصر ، جرب الملف و وافيني بنتيجة test120 (1).mdb
    1 point
  21. 1 point
  22. سبحانك لا علم لنا الا ما علمتنا انك انت العليم الحكيم اللهم لك الحمد الحمد لله تعالى الذى تتم بنعمته الصالحات الحمد لله تعالى الذى هدانا وما كنا لنهتدى لولا ان هدانا الله عزوجل ودعنى لا ننسى اسناد الفضل بعد رب العزة سبحانه وتعالى الى اهله ومن يستحقون فتلك امانه استاذى الجليل ومعلمى القدير ووالدى الاستاذ @ابوخليل هو صاحب الفضل بعد رب العزة سبحانه فى معيار الفلتر بين تاريخين بتلك الطريقة الرائعة اسأل الله تعالى يرزقه وكل اساتذتنا البركة فى العمر والعلم والاهل والولد وان يجعل كل اعمالهم فى موزازين حسناتهم ان شاء الله ويرزقهم القبول .......... امين امين امين
    1 point
  23. اتفضل sar: Sum(Nz([فواتير المبيعات_تفاصيل]![سعر_البيع]*[Quantity]))
    1 point
  24. Mouvementvendus ايه دى وهى فين فى التقرير اصلا المشكلة الاولى كانت بالاستعلام وانحلت
    1 point
  25. فورم مشاهدة البيانات المسجلة بالشيت فيديو 3 الفيديو
    1 point
  26. طيب خير الحمد لله الان انظر الى الاستعلام >>------->> qryMixToetbl عدل عليه بما يناسبك او اخبرنى ماذا تريد
    1 point
  27. جزاك الله خير الجزاء اخي kha9009lid ابا جودى انا جديد في المنتدى لاتؤاخذني معك كل الحق لازم كنت ادرج سؤالي في مرفق المرات القادة انشالله شكرا جزيلاً لكم جميعاً
    1 point
  28. السلام عليكم انشاء مستخدم جديد للويندوز غير الذى تستخدمه الان للويندوز ونجح الأمر والمستخدم القديم لا يعمل فيه شكرا لكم وجزاكم الله عنا خيرا
    1 point
  29. الله يبارك فيك ويحفظك استاذي الفاضل ابا جودي نعم هذا هو المطلوب جزاك الله خيرا اللهم ربي يمن عليك بالصحة والعافية والخير والبركات يارب
    1 point
  30. جرب المرفق افتح استعلام2 يطلب ادخال رقم الشهر الاشهر.accdb
    1 point
  31. الله عليك يا مبدع يابا جودي بجد ابدعت فيما شرحت السهل الممتنع ربنا يكرمك ويسعد ايامك
    1 point
  32. اذهب الى محرر الاكواد اختر القائمة Tools ثم اختر منها References كما بالصورة الاتية لو كانت هناك مشكلة بالمكتبات ستجد كلمة :Missing بجوار اسم المكتبة مثل هذه الصورة على سبيل المثال
    1 point
  33. اين الضغط على الإعجاب ؟!!!!!
    1 point
  34. تفضل لجان الدور الثاني2.xlsx
    1 point
  35. طيب يا استاذ @محمد احمد لطفى الحل ده يرضيك واللا اروح انام test120 (2).mdb
    1 point
  36. شكرا لذوقك وكرم اخلاقك ربنا يكرمك ويزيدك من علمة
    1 point
  37. امبارح والله يا دكتور @حلبي كنت اضحك ايضا وانا اتابع ردود اخوتى ونتبادل المزاح فقالت زوجتى وحبيبة عمرى وام اولادى يعنى يارب عمل عمليه كبيرة ورضينا والحمد لله على كل حال لكن يارب يتجنن ويضحك لوحدة كده ده كتير قوى اللهم لا اعتراض واللهم انى لا اسأل رد القضاء ولكن اسألك اللطف جزاكم الله خيرا يا دكتور على دعواتكم الطيبة
    1 point
  38. طبعا اساتذتى الكرام كفوا ووفوا باجابتهم على السؤال لهم كل الشكر والتقدير والعرفان جزاهم الله تعالى خير وشكر الله لهم واحسن اليهم كما يحسنون الى طلاب العلم امثالى بعد اذن اساتذتى الافاضل الكرام اشارك بفكرة متواضعة للمرور على كل الكائنات دفعة واحدة Database311.accdb
    1 point
  39. مكتبة اكواد ودوال الأكسس.accdb VBALibrary.accdb
    1 point
  40. بارك الله فيك وزادك الله من فضله ووسع الله فى رزقك
    1 point
  41. بارك الله فيك استاذ ابراهيم وجزاك الله كل خير
    1 point
  42. جرب هذا الرابط طالما انك لم تقم برفع ملف https://www.officena.net/ib/topic/70163-تصميم-برنامج-لبطاقات-دخول-الموظفين/
    1 point
  43. حاول تغيرها لـ 32 بت أفضل وستعمل معك جميع برامج إلغاء الشيقت عذرا
    1 point
  44. دائما مبدع استاذ سليم بارك الله فيك استاذى الكريم
    1 point
  45. بوركت استاذ بن علية معادلة رائعة جعله الله فى ميزان حسناتك
    1 point
×
×
  • اضف...

Important Information