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

أبو قاسم

04 عضو فضي
  • Posts

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

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

  • Days Won

    1

كل منشورات العضو أبو قاسم

  1. السلام عليكم محتاج بحث بداية ونهاية تاريخ معين يظهر كل الاسماء وبعد ذلك اختار اسم واحد فقط من تكست بوكس7 البحث من خلال اى عدد من التكست 1بوكس.xlsm
  2. السلام عليكم ورحة الله وبركاتة محتاج طريقة استخراج النسبة المئوية ...... ايد اكتب العدد الاول مثلا 200 والعدد الثاني 195 يعطيني النسبة المئوية وجزاكم الله خير البحث من خلال اى عدد من التكست بوكس.rar
  3. السلام عليكم محتاج كود أو طريقة منع المستخدم من إدراج صف أو حذف صف ولكم كل الشكر والتقدير
  4. Private Sub worksheet_SelectionChange(ByVal Target As Excel.Range) ' حيث اسم الشيت المطلوب عدم تغيير اسمهMaster If ActiveSheet.Name <> "Master" Then ActiveSheet.Name = "Master" End If End Sub [/CODE) شكرا لك وجزاك الله الف خير
  5. كود منع المستخدم من تغيير اسم الشيتات
  6. عند الكتابة في عمود A2-01. يظهر لي 1-صفر ماهو الحل. ولو حتى بالأكواد ..... ولكن عند اختيارها من قائمة منسدلة تظهر بشكل صحيح
  7. السلام عليكم ورحمة الله وبركاتة المطلوب استخراج متوسط ساعات العمل لكل موظف خلال فترة لتقييم الموظف المجتهد طبعا بامكانكم التعديل على الفكرة Book1.rar
  8. استخرجنا وقت الدخول بالمعادلة =IF(D2="دخول";TEXT(C2;"hh:mm")+0;"") التي في العمود E .......ثم استخرجنا الخروج بامعادلة =IF(D2="خروج";TEXT(C2;"hh:mm")+0;"") التي في العمود F ...... ثم استخراج الوقت الفعلي للعمل بالمعادلة =IFERROR(F3-E2;"") التي في G
  9. جرب هذة الفكرة يمكن تطبق معاك المصنف1.rar
  10. ربنا يبارك فيك ويزيدك علما ويجعل ماتقوم بة في ميزان حسناتك ........... كود ممتاز ولك كل الشكر والتقدير ورمضان كريم
  11. الموجود: عند الكتابة في الخلية o2 يظهر التاريخ والوقت في الخلية l2 المطلوب : عند مسح الكتابة من الخلية o2 يمسح التاريخ في الخلية l2 Book1.rar
  12. رمضان كريم على الجميع واشكركم جزيل الشكر والعرفان لاتسعني الكلمات التي اقولها ولكن نقول جزاكم الله عنا الف خير مع التحية
  13. السلام عليكم ورحمة الله وبركاتة جعل الادخال في الحضور والانصراف عن طريق دبل كليك فقط ولا يمكن الكتابة اليدوي Book1.rar
  14. Private Sub Workbook_Open() Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",false)" Sheets(1).Select End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",TRUE)" Application.ScreenUpdating = True End Sub ضع هذة الاكواد في ThisWorkbook
×
×
  • اضف...

Important Information