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

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

  1. Moosak

    Moosak

    أوفيسنا


    • نقاط

      7

    • Posts

      1,997


  2. أبو إبراهيم الغامدي
  3. ابوخليل

    ابوخليل

    أوفيسنا


    • نقاط

      4

    • Posts

      12,188


  4. ناقل

    ناقل

    الخبراء


    • نقاط

      4

    • Posts

      558


Popular Content

Showing content with the highest reputation on 26 ديس, 2021 in all areas

  1. أهلا بكم جميعا.. هذا مثال مصغر عن إمكانية الويب مع الأكسس وفلسفة التجاوب.. AccessWithWeb.accdb
    4 points
  2. استخدم هذه الشيفرة ...... Project_path = DLookup("[Folder_Path]", "msar_folder_tb", "[ID]=2") DBOld = CurrentProject.Path & "\2URL.accdb" DBNew = Project_path & "\backup_2URL" Shell "cmd.exe /C copy " & """" & DBOld & """" & " " & """" & DBNew & "\" & Format(Now, "yyyy-mm-dd@hh.nn.ss") & "2URL" & ".accdb" & """", 0 MsgBox Space(20) & "تمت العملية بنجاح.." & Space(20), msgstyle, "للمعلومية"
    2 points
  3. بعد البحث تبين ان حجم الحقل هو القيمة الفعلية للبيانات المدخلة وعلى هذا : الحجم 255 لا تأثير له على المساحة المحجوزة انظر هنا و هنا و هنا
    2 points
  4. اخي Tarekchahine كان يجب عليك استخدام خاصية البحث تفضل : طلبك هنا Disable Enable Cut copy paste .rar
    2 points
  5. بالفعل، لكن يمكن تطويع الhtml لخدمة الأكسس. انا لم اتكلم عن قوة الأكسس كـ برنامج خدمي وسهل وو.. تكلمت فقط عن امكانياته المحدودة في التصميم مقارنة بالبرامج الاخرى، ومثل ما تفضلت يبقى المصمم هو فارس الميدان في جعل الشكل جذاب ومرتب. وكـ مبادرة صغيرة مني في دعم موضوعك الرائع اقدم لكم واجهة بسيطة قمت بتصميمها في الاكسس واهم مايميزها responsive مع جميع الشاشات، اتمنى لكم الفائدة من هذه الواجهة وبنفس الوقت لا تتوقعو مني الكثير في تصميم الواجهات فأنا لا ازال في بداية الطريق اهلا عزيزي ابا جودي، لك وحشة ياغالي.. بالعكس انا لم اقل الاكسس عاجز وانما قلت ان الاكسس محدود اما عن الresponsive فأنا قمت بشرحها سابقا في هذا الموضوع، ربما طريقتك تختلف عن طريقتي لكن يبقى الجوهر واحد تحياتي لك ابا جودي menu.rar
    2 points
  6. السلام عليكم اسعد الله صباحكم تجربتي في الاكسس ليست بالبعيده ومازلت اتعلم واحببت ان اذكر اهم نقاط مهمله يجب الانتباه لها لجعل برنامجك يعمل بشكل جيد .. نبدأ في النقاط الـ 6 الأولى وبإذن الله سيتم إنعاش الموضوع كل يوم .. الموضوع مفتوح للجميع ويمكن إضافه إثرائك بما يجود به من علمك ولكن اجعله مبسط وقابل للفهم بالنسبه للمبتدئين 1- اسماء الحقول في الجدول + اسماء كافة العناصر لا اقول يجب لأنه عمليا تستطيع كتابتها بالعربي ولكن الافضل الافضل الافضل ان تكون بالانجليزي ويفضَل بدون مسافات وتستطيع استبدال المسافه بـ ( _ ) ولا بأس في التسميات التوضيحيه في النماذج والتقارير ان تكتب مايناسبك في العربي واستخدم المسافه - اهتم بأسماء العناصر ليسهل عليك معرفتها مثلا نموذج لإضافة موظف جديد( employees_form_add ) لماذا ؟ - تجنب الاخطاء عند كتابه الاكواد في منشئ التعبير واكواد ال vba وغيرها .. - تجنب اخطاء الترميز في لغات الويندوز ربما لا يعمل برنامجك في جهاز ترميز اللغه العربيه يكون غير معروف. ----------------------------------------------------------------------------- 2- حجم الحقل (اي عدد الحروف) ضروري جدا الاهتمام به و يكون متناسب مع نوعية البيانات الافتراضي دائما يكون (250) فمثلا بحقل الاسم ولنفترض ان هناك موظف اسمه (عبداللطيف عبدالرحمن عبدالملك عبدالله الاوفيسي) في الاسم اعلاه جميع الحروف مع المسافات عددها (45 حرف) إذا ... ؟ باقي هناك 205بت حجزت وزادت بحجم القاعده تم حجزة بدون فائده. - ستجد ان بعض الحقول تحتاج فقط 5 أحرف ومنها جنس الموظف إما ذكر او انثى .. إذا لماذا 250 حرف ف الافضل تقليصها بما يتناسب مع بيانات الحقل ----------------------------------------------------------------------------- 3- لديك مثلا جدول موظفين وفيه عدد 15 حقل وتريد اضافه نموذج (عناصر متعدده) (عناصر متعدده يعني كل موظف تنعرض بياناته في سطر والسطر الثاني للموظف الثاني وهكذا) غير ضروري انك تعرض البيانات كامله وتقدر تضيف فقط حقل الاسم والرقم الوظيفي والجنس والجنسيه وبكل بساطه تقدر تسوي زر في حال اردت عرض البيانات كامله يوجهك إلى نموذج تنعرض كامل البيانات فيه يكون قدام كل موظف وهذا اجمل واكمل مثال - الافضل في نماذج العناصر المتعدده الغاء الاضافه وتتم الاضافه في نموذج خاص بالاضافه. - نموذج عرض البيانات لا تجعله يستند إلى استعلام الافضل تتم برمجة زر عرض البيانات لجلب النموذج وعرض بيانات الموضف استنادا إلى رقم الموظف لماذا لكي تستفيد من نموذج عرض البيانات في ازرار اخرى ولا يكون حصري على نموذج تصفح الموظفين. ----------------------------------------------------------------------------- 4- عند انشائك لأي نموذج يعرض بيانات موظف واحد فقط اي سجل واحد وليس هناك أي ازرار تنقل لتسريع عملية فتح النموذج وتجنب بطئ القاعدة والافضل هو ان تجعل هذا النموذج دورة في السجل الحالي فقط لكي لا يتم صف السجلات الاخرى في الخلفيه بإنتظار المستخدم للإنتقال إلى السجل التالي وعرضه واساسا ليس هناك اي زر تنقل وإنما النموذج خصص لعرض سجل واحد فقط .. الطريقه | من خصائص النموذج > إذهب لغير ذلك > من خاصية دورة اختار (السجل الحالي) ----------------------------------------------------------------------------- 5- بعض الازرار تكون مكرره في اغلب النماذج مثلا ( الاضافه - الحذف - الحفظ - البحث الافتراضي - التنقل ) وهذه الازرار لا تحتاج إلى معرفة اسم النموذج هو يقوم بالأمر في السجل الحالي بغض النظر عن اسم النموذج وانت بدورك كمبرمج تطمح إلى مزيد من التقدم والاحترافية يجب ان تكون ذكيّا لتقلل الاكواد او المايكرو المكرر في كل نموذج م الحل ؟ ببساطه اجعل كود حفظ او اضافه او الحذف في وحدة نمطيه واستدعها متى ما شئت في الزر المناسب مثلا: اجعل كود الحذف في وحده نمطيه ك التالي : ومن ثم من زر الحذف الموجود في النموذج عند حدث عند النقر اكتب مايلي وهو الاستدعاء : كرر عملية الاستدعاء في ازرار الحذف الاخرى كما يمكنك استخدام المايكرو بدلا من الوحده النمطيه واستدعاءه في اي زر اذا كنت ما زلت لم تستخدم الاكواد انشئ مايكرو وضع فيه امر الحذف كما يلي: ثم في حدث عند النقر في زر الحذف استدع المايكرو كما يلي: كرر عملية الاستدعاء في ازرار الحذف الاخرى م الفائده : تقليل الاكواد او المايكرو مما يساهم في تقليل الاخطاء وتسريع القاعده ----------------------------------------------------------------------------- 6- كـ لمسه فنية إذا اردت تغيير اسم النموذج الذي يظهر في اعلى عند شريط القائمة الواضح هنا .. ولأنك التزمت في النقطه السابقه بعدم تسيمة النماذج بالعربيه كيف إذا تعيد تسميتها بالعربي وبأي مسمى ؟ الحل بكل بساطه .. عند حدث في الحالي بالنموذج الذي تريد تغغير مسماه اكتب الكود البسيط التالي : Me.Caption = "اكتب هنا الاسم الذي ترغب ان يظهر في اعلى النموذج" ----------------------------------------------------------------------------- نكتفي بهذا القدر على امل بكم في النقاط ال 6 الاخرى غدا بإذن الله
    1 point
  7. لا يوجد شيء اسمه تحويل من اكسل الى اكسس انت بحاجة الى انشاء مشروعك على اكسس من الصفر بناء على المعطيات في اكسل اذا لديك معرفة اولية وتود تعلم اكسس يمكنك البدء بمشروعك واخوانك هنا لن يبخلوا عليك بالمساعدة البرنامج جميل يخدم فئة خاصة عزيزة على القلوب انا الآن سأوجهك الى اول بداية الطريق : ملفات اكسل واضحة ( التدريب والمتابعة) ضمن نقاط يتم تحقيقها . ولكن الشيء الغير واضح هو العمل الفني والاداري على ارض الواقع فاول شي يجب ان تشرح خط سير الطفل اليومي والاسبوعي والشهري ( تشرح البرنامج ) ويجب ان تسهب في الشرح وتذكر ادق التفاصيل لان تصميم اكسس وقواعد البيانات يختلف كليا عن مصنف اكسل . بعدها سوف يقوم من سيساعدك بتحليل بياناتك واخذ تصور عام شامل للطريقة المثلى لتصميم قاعدة البيانات .
    1 point
  8. عند حدث الفتح ضع هذا الكود ..... Me.AllowEdits = False
    1 point
  9. اسف جدا انا نسيتك 🧐 والله افتكرت دلوقتى بس للعلم فى مشكلة بقاعدتك القديمة ولا ادرى عنها شئ سوف اقوم بانشاء القاعدة مع اضافة التعديلات اللازمة فى اقرب وقت ان شاء الله
    1 point
  10. بارك الله فيك الكود اشتغل تمام
    1 point
  11. عليكم السلام تفضل استخدم top في الاستعلام مع الترتيب التنازلي HQ2.accdb
    1 point
  12. ارجوا ان يكون هذا مطلبك empl2021.accdb
    1 point
  13. السلام عليكم اليك اخى الملف تم تنفيذ المطلوب شاشة دخول.xlsm
    1 point
  14. إن شاء الله أشرح ذلك قريبا أخي العزيز 🙂🌹
    1 point
  15. السلام عليكم ورحمة الله استخدم تلك المعادلة =IF(LEN(C4)>0;YEAR(TODAY())-MIN(YEAR(C4);D4);YEAR(TODAY())-YEAR(D4))
    1 point
  16. السلام عليكم اليك اخى الملف لعله يفي بالمطلوب data.xlsm
    1 point
  17. وهذا حل يالتنسيق الشرطى هام.xlsx
    1 point
  18. السلام عليكم ورحمة الله استخدم الكود التالى Sub Cold_Cells() i = 2 Do While i <= 30 For Each c In Range("F2:F8") If Cells(i, 9) = c.Value Then Cells(i, 9).Interior.ColorIndex = 6 End If Next i = i + 1 Loop End Sub
    1 point
  19. النموذج السادس : قوائم منسدلة وأزرار جانبية 🙂 وملف التحميل 🙂 صفحة رئيسية مطورة - النموذج السادس.rar
    1 point
  20. حياك الله أخي الحلبي .. قمت الآن بتعديل الكود ليحمل أي عدد من الأزرار الفرعية .. ولكن بشرط الشرط هو أن تراعي تسمة الأزرار الإضافية بنفس النسق الذي تم تسمية الأزرار السابقة به .. فمثلا أزرار القسم الأول هكذا : ____SubBtn1 (مكان الفراغ تضع رقم الزر الفرعي) و أزرار القسم الثاني هكذا : ____SubBtn2 وهلم جرا ... منظر حي للتعديل : 🙂 للعلم : تم تحديث الرابط في المشاركة الأساسية .. وللزيادة هنا أيضا 🙂 ‏‏صفحة رئيسية مطورة - النموذج الخامس.accdb
    1 point
  21. النموذج الخامس : قائمة مطوية وأزرار فرعية ... وفيها جمع بين فكرتي النموذجين الثاني والثالث ... بـالستايل الأسود لمحبي الستايلات الغامقة 🙂 همسة في أذن الخبراء : كيف أجعل القوائم تمتد إلى آخر النموذج من جهة اليمين عند طي الأزرار ؟ وهنا التحميل لكل شخص جميل 🙂 : ‏‏صفحة رئيسية مطورة - النموذج الخامس.accdb
    1 point
  22. النموذج الرابع ... شكل جذاب بإطار مميز هذه المرة شكل جديد معتمد على عناصر مصممة بالفوتوشوب ومدمجة مع عناصر الأكسس 🙂 وملف التصميم كما تعودتم 🙂 ‏‏صفحة رئيسية مطورة - التصميم الرابع.accdb
    1 point
  23. السلام عليكم برنامج رائع جدا يفيد الموضوع 100/100 Hotel Reservation Daily (ADVANCED EXCEL).zip
    1 point
×
×
  • اضف...

Important Information