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

Moosak

أوفيسنا
  • Posts

    2296
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    57

كل منشورات العضو Moosak

  1. كيف تم الاختراق شايبنا ؟ ماذا كتبت مكان كلمة المرور ؟ طيب جرب مع هذا : 🙂👈 قالب تسجيل الدخول مع صلاحيات دخول النماذج.accdb
  2. الله يبيض وجهك تظهر لي هذه عند الضغط على تنفيذ (لم يتم العثور على العمود B ) : وكتعديل على طريقة تحديد أسماء الأعمدة ، قمت بهذا التعديل الطفيف : والنتيجة ستكون حسب الإجابة على هذه الرسالة : وكذلك تم تعديل كود الكومبو الآخر أيضا 🙂 الأول: Private Sub Comb_Sheets_AfterUpdate() On Error GoTo ErrorHandler Dim col As Long If IsNull(Me.Comb_Sheets) Or Me.Comb_Sheets = "" Then Exit Sub Set xlWorksheet = xlWorkbook.Sheets(Me.Comb_Sheets.Value) Me.Comb_Cells.RowSource = "" Me.Comb_Cells = "" Dim HasColumnHead As Boolean HasColumnHead = True If MsgBox("هل الصف الأول هو عنوان الأعمدة؟", vbMsgBoxRight + vbYesNo, "") = vbNo Then HasColumnHead = False For col = 1 To xlWorksheet.UsedRange.Columns.Count If HasColumnHead = True Then ' To Fill Combobox with First row Names as column Name Me.Comb_Cells.AddItem xlWorksheet.Cells(1, col).Value Else ' Fill Combobox with column Names like A,B,C,....etc Me.Comb_Cells.AddItem Split(xlWorksheet.Cells(1, col).Address, "$")(1) End If Next col Exit Sub ErrorHandler: MsgBox "حدث خطأ: " & vbCrLf & Err.Description, vbCritical + vbMsgBoxRight, "" End Sub الثاني : Private Sub Comb_Sheet_AfterUpdate() On Error GoTo ErrorHandler Dim col As Long If IsNull(Me.Comb_Sheet) Then Exit Sub Set xlWorksheet = xlWorkbook.Sheets(Me.Comb_Sheet.Value) Me.Comb_Cell.RowSource = "" Me.Comb_Cell = "" Dim HasColumnHead As Boolean HasColumnHead = True If MsgBox("هل الصف الأول هو عنوان الأعمدة؟", vbMsgBoxRight + vbYesNo, "") = vbNo Then HasColumnHead = False For col = 1 To xlWorksheet.UsedRange.Columns.Count If HasColumnHead = True Then ' To Fill Combobox with First row Names as column Name Comb_Cell.AddItem xlWorksheet.Cells(1, col).Value Else ' Fill Combobox with column Names like A,B,C,....etc Me.Comb_Cell.AddItem Split(xlWorksheet.Cells(1, col).Address, "$")(1) End If Next col Exit Sub ErrorHandler: MsgBox "حدث خطأ: " & vbCrLf & Err.Description, vbCritical + vbMsgBoxRight, "" End Sub
  3. تسلم الأيادي مستر @Foksh 😊🌼🌹🌷 لااااااااااا ... ذي محتاجة شرح لحالها 😎🖐
  4. سلمت يمناك باش مهندس @Foksh 🙂🌷 كفيت ووفيت .. لله درك 😊👌 كمقترح لهذه النقطة : هل يمكن إظهار الأعمدة بأسمائها البرمجية ( A B C D E F ...) بدل الكلمة المكتوبة في الصف الأول .. 🙈
  5. ما شاء الله عليك يا باش مهندس .. 🙂🌷 شعلة من النشاط والحماس .. 👍🏻😊 موضوع مهم والكثير محتاجينه 👌
  6. أعتقد أنك لو أستغنيت عن الأكسل وأكتفيت بقاعدة بيانات الأكسس ( نسخة الجداول ) بحيث أنك تقوم بعمل نسخة منها على الجوجل درايف لتمكنت من ربطها بالبرنامج المنصب عندك في المنزل .. وفي هذه الحالة ستحتاج لجعل البرنامج يحدث قاعدة بيانات الجوجل درايف تلقائيا قبل الخروج من برنامجك في الدوام .. وفي البيت تربط البرنامج كذلك بنسخة الجوجل درايف ليتم حفظ ما تقوم به في البيت على هذه القاعدة .. وعندما تعود للعمل في اليوم التالي تجلب البيانات الجديدة إلى قاعدة بيانات العمل .. هل هذا الحل يناسبك ؟
  7. هذه مشاركتي مع الشباب بحكم معرفتي بالقالب الذي صممته سابقا 🙂 أضفت لجدول المستخدمين حقل لقائمة النماذج التي في البرنامج لتحديد النماذج المسموح بها : بعد ذلك صممت دالة تقوم بفحص ما إذا كان النموذج المحدد هو من ضمن النماذج المسموح بها بناءا على المستخدم الحالي (الذي قام بتسجيل الدخول) هذه الدالة تعطيها اسم النموذج > وستفحص إن كان هذا النموذج من ضمن الصلاحيات > وستعطيك True أو False حسب ما إذا كان النموذج من ضمن الصلاحيات أو لا .. وكذلك تغلق النموذج الغير مسموح بدخوله .. ولتطبيق الكود على النماذج فقط ضع هذه الجملة في حدث عند الفتح للنماذج التي تريد تطبيق الصلاحيات عليها : للتحميل : قالب تسجيل الدخول مع صلاحيات دخول النماذج.accdb
  8. إقرأ هذا المقال 🙂 : https://isladogs.co.uk/security-alert-message-bar/index.html
  9. أهلا بك أخي محمد ، 🙂🌼 وشكرا لك على الإطراء .. بالنسبة لتلوين الإجازات كل نوع بلون هذه لم أفكر فيها بعد .. وتحتاج لمجهود أو فكرة أفضل من الطريقة الحالية المعتمدة على التنسيق الشرطي ..
  10. الله يبارك فيك يا سعادة الباشا 😊 دا قليل مما عندكم 😇 وأجاب الله دعواتك .. لنا ولكم 😊🤲
  11. بل يوجد .. 🙂 في بالي مقترحين ... ولكن جرب المقترح الأول : في مصدر بيانات النموذج جرب هذا الخيار : وأخبرنا بالنتيجة ..
  12. أحسن الله إليك على هذه الكلمات التي لو وزنتُها بكنوز الأرض لرجحت بها 😊🌹🌼🌷 جعلها الله أداة نافعة لكل طالب .. وخالصة لوجه الله الكريم .. وأجاب الله دعواتك الخالصة ورزقك أضعافها .. 🤲 ونحن لا نزال نغترف من يم علمكم الوافر 🙂
  13. وعليكم السلام .. 🙂 إضغط على ملف الأكسس نفسه بالزر الأيمن للماوس > إختر خصائص > علم على إلغاء الحظر بعلامة صح > موافق
  14. وعليكم السلام .. 🙂 قم بتمكين الإضافة لهذه النماذج ..
  15. تمام يا هندسة .. أنا متفق معاك تماما .. وكنت بقول لك إنت غيرها بنفسك… 😁👊🏻 أنا جربت النسخة الأولى وكانت شغالة معاية 🙂👌 وهنا عدلت النموذج فقط على أساس أنه سابقا كل حاجة كانت تمام .. 👍🏼 ما هو أحنا عاملين كل هذا للمستخدم النهائي أصلا .. 😅🖐️ والمبرمج مستفيد منها أيضا بالطبع 😁 بتفرق جدا يا باش مهندس .. لما تختار العربية لبلد ثاني تلاقي الجهاز بيضبط معاها لغة الكيبورد والعملة وأسماء الشهور ووووووو… لذلك بسبب هذي النقطة مهم أنك توفر الخيارات للمستخدم 🙂👌
  16. هو فعلا حاسب حساب لهذا الأمر في الكود الرئيسي .. ولكن باقي رسالتين مكتوبتين بالعربي ممكن تجاوزهم وتعديلهم 🙂 وحتى النموذج حاط فيه صورة لإظهار الكتابة اللي بالعربي
  17. أبدعت ... أبدعت ... أبدعت ... بسم الله ما شاء الله 😄👏👏👏 طيب أيش رايك في ذي الفكرة : LanguageCheck V 2.1.accdb
  18. جرعة من الدافعية المعنوية والراحة النفسية 😊😊✌ شكراً لمرورك العاطر 🌼😊🌷 أهم شي خاصية الـ Noise cancelling 😂😂😂 يا رجل كنت أسمع النمل حتى 😅😂
  19. اعرض الملف 🎁📅 :: المخطط السنوي للإجازات :: 🌼🌷 :: عرض جميع إجازات الموظفين على الجدول الزمني Gantt Cart دايناميكي 😊👌🏻 السلام عليكم ورحمة الله وبركاته 🙂 اليوم يسرني أن أقدم لكم هذه الهدية المتواضعة :: المخطط السنوي للإجازات :: وهو عبارة عن تقويم سنوي لإجازات الموظفين يتم رسمه دايناميكيا على مخطط رسم بياني يسمى Gantt Chart 👌 يمتاز التصميم بالسهولة والجمال والإبداعية وقد شرحت كيفية استخدامه في الفيديو التالي ✌ في التحديث الجديد 1.7 تم إضافة حقل لمجموع عدد الأيام سنويا ... مع دعم للإجازات عابرات القارات (الإجازات التي تمتد لعدة سنوات كالإجازات الدراسية الطويلة) ظهور عدد الأيام في جميع النوافذ من مميزات هذا المخطط: - عرض جميع الإجازات في صفحة واحدة يسهل من قرائتها ومراجعتها. - تصميم رائع وألوان جميلة . - سهل الاستخدام . - وكذلك هذا المخطط يمكن استخدامه للمشاريع بدل الإجازات أو عرض مدة الإيجارات أو .. أو .. أو ... حيث لا حدود للإبداع 🙂 :: وأخيرا وليس آخرا :: :: لا تنسونا ووالدينا من صالح دعواتكم الطيبة 🙂 🌹🌷 :: صاحب الملف Moosak تمت الاضافه 01 ينا, 2025 الاقسام قسم الأكسيس
  20. Version 1.7.0

    127 تنزيل

    السلام عليكم ورحمة الله وبركاته 🙂 اليوم يسرني أن أقدم لكم هذه الهدية المتواضعة :: المخطط السنوي للإجازات :: وهو عبارة عن تقويم سنوي لإجازات الموظفين يتم رسمه دايناميكيا على مخطط رسم بياني يسمى Gantt Chart 👌 يمتاز التصميم بالسهولة والجمال والإبداعية وقد شرحت كيفية استخدامه في الفيديو التالي ✌ في التحديث الجديد 1.7 تم إضافة حقل لمجموع عدد الأيام سنويا ... مع دعم للإجازات عابرات القارات (الإجازات التي تمتد لعدة سنوات كالإجازات الدراسية الطويلة) ظهور عدد الأيام في جميع النوافذ من مميزات هذا المخطط: - عرض جميع الإجازات في صفحة واحدة يسهل من قرائتها ومراجعتها. - تصميم رائع وألوان جميلة . - سهل الاستخدام . - وكذلك هذا المخطط يمكن استخدامه للمشاريع بدل الإجازات أو عرض مدة الإيجارات أو .. أو .. أو ... حيث لا حدود للإبداع 🙂 :: وأخيرا وليس آخرا :: :: لا تنسونا ووالدينا من صالح دعواتكم الطيبة 🙂 🌹🌷 ::
  21. الله الله الله 😄👏👏👏 إبداع إبداع إبداع ... بكل ما تحمله الكلمات من معنى هذا هو الحل للمعضلة العضلاء وأم المشاكل السوداء 😂🖐 بعد التجربة بنجاح باهر أقول لك : جزاك الله عنا وعن الأمة كل خير .. وغفر الله لك ولوالديك وجميع أحبابك 🙂🤲🏻 طلب صغنن لإتاحة التحكم بالكود حسب الاحتياجات الخاصة المختلفة : كيف أخلي اللغة الإدارية عربي (عمان) مثلا .. أو بالأحرى كيف أختار دولة محددة بذاتها ؟ هل ممكن عمل ملف "bat" أو "Cmd" أو "Reg" مثلا بشكل منفصل ويقوم بتشغيل هذه الإجراءات نفسها تلقائيا بمجرد الضغط عليه .. ( لدي فكرة في بالي )
×
×
  • اضف...

Important Information