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

أ / محمد صالح

أوفيسنا
  • Posts

    4,448
  • تاريخ الانضمام

  • Days Won

    192

كل منشورات العضو أ / محمد صالح

  1. حدد الخلايا المطلوب تنسيقها ثم اضغط CTRL+1 لفتح نافذة تنسيق الخلايا format cells في التبويب الأول رقم number اختر تاريخ date واختر من الجزء الأيمن تنسيق التاريخ المطلوب وإذا لم تجد المطلوب غير نوع التقويم من أسفل الجزء الأيمن ستجد تنسيقات أكثر بالتوفيق
  2. الملف مرتبط بملفات أخرى
  3. عليكم السلام ورحمة الله وبركاته يمكنك استخدام هذه المعادلة في الخلية J9 =IF(F9=5,IF(COUNTIF($F$9:F9,5)/COUNTIF($F$9:$F$1000,5)<=0.5,"الفرح","الزهور"),"اشراقة") بالتوفيق
  4. جرب أن تضع هذه المعادلة في الخلية B3 =IF(A3<=100,A3*1.5,IF(A3<=150,150+(A3-100)*2,IF(A3<=200,250+(A3-150)*5,500+(A3-200)*6))) على افتراض أن الأكثر من 200 ب 6 وطبعا ال 150 عبارة عن 100 في 1.5 وطبعا 250 عبارة عن 150 + ( 50 في 2) وطبعا ال 500 عبارة عن 250 + (50 في 5) بالتوفيق
  5. يلزمك القراءة عن المراجع المطلقة والمراجع النسبية جرب استعمال =$A$1-A4 سيتم تثبيت A1 بالتوفيق
  6. يمكنك إضافة خيارات اللغة إلى شريط الوصول السريع ملف --- خيارات --- تخصيص شريط الوصول السريع file - options - quick access toolbar أوامر غير موجودة في الشريط commands not in the ribbon هيارات اللغة options language إضافة add ok كما بالصورة بالتوفيق
  7. جرب استعمال هذا الكود في حدث تغيير محتويات الشيت Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then If Target.Value = "done" Then Target.Offset(0, 2).Value = Target.Offset(0, 1).Value Target.Offset(0, 4).Value = Date End If End If End Sub بالتوفيق
  8. عليكم السلام يمكنك فتح الملف ثم النقر فوق "ملف" و"فحص المصنف" File - Inspect Workbook وأصلح ما تجده من عيوب سيفتح معك بصورة طبيعية بعدها إن شاء الله بالتوفيق
  9. عليكم السلام جرب هذه المعادلة في أي عمود في الصف الثاني ونسخها لأسفل =IF(INDIRECT(IF(ISODD(ROW()),"A","B")&INT(ROW()/2)+1)="","فارغ",INDIRECT(IF(ISODD(ROW()),"A","B")&INT(ROW()/2)+1)) بالتوفيق
  10. الاحتمالات كثيرة جرب أن تفتح الملف من على الجهاز الرئيسي من خلال الشبكات ثم فتح الجهاز ثم فتح الملف لأنه ربما الاختصار shortcut يكون غير دقيق وتأكد من صلاحيات هذا الجهاز هل له صلاحية لتعديل الملفات على الشبكة أو الوصول إليها أظن أن هذا الجهاز لا يفتح الملف على السيرفر وإنما يفتح ملفا آخر به البيانات حتى شهر 3
  11. لا أدري ما المشكلة لديك في تنفيذ الخطوات بعد تغيير خصائص جميع الخلايا إلى محمية ثم تنسيق الخلايا المراد الكتابة فيها بغير محمية ثم حماية الشيت بكلمة مرور ثم ضبط خيارات الاكسل - متقدم الذي يحدث معي: الكتابة في الخلية الأولى المسموح الكتابة فيها ثم بعد الضغط على انتر يتم الانتقال إلى ثاني خلية مسموحة حتى لو بينها وبين الأولى أي عدد من الأعمدة إلى نهاية الصف المسموح وعند نهاية الصف ينزل إلى أول خلية مسموحة في الصف التالي وهكذا وأعتقد هذا هو المطلوب إن كان فهمي صحيحا
  12. هذا ملفك بعد تنفيذ التعليمات الواردة في المشاركة السابقة وطبعا طريقة تحديد الانتقال بعد انتر في الخيارات معروفة ملف -- خيارات -- متقدم ثم تختار يمين كما بالصورة Example.xlsm
  13. عليكم السلام جرب استخدام هذا الكود بعد تحديد الخلايا التي يراد وضع ارتباط تشعبي لها Sub AddHypaerlinks() Dim cl As Range Dim myPath As String, fileName As String myPath = "C:\Users\civat\Desktop\New folder\" 'SET TO WHERE THE FILES ARE LOCATED For Each cl In Selection If Len(cl) > 0 Then fileName = myPath & cl.Value & "*.docx" 'IF THE FILE EXISTS THEN If Len(Dir(fileName)) <> 0 Then ActiveSheet.Hyperlinks.Add cl, myPath & Dir(fileName) End If Next End Sub بالتوفيق
  14. حسب فهمي للمطلوب طبعا بعد جعل جميع خلايا الشيت مؤمنة ومخفية locked & hidden ما عدا الخلايا المسموح بالكتابة فيها (بحذف علامة الصح بجوار locked & hidden ) من التبويب الأخير لنافذة تنسيق الخلايا (protection حماية ) ثم اثناء حماية الشيت من تبويب مراجعة review قم بإلغاء تحديد الخلايا المؤمنة (الملونة باللون الأصفر في الصورة التالية) بالتوفيق
  15. إن شاء الله يفيدك هذا الملف نموذج بسيط لاختيار الوقت مثل اختيار التاريخ بالتوفيق time picker.xlsb
  16. عملية البحث طبيعية ولا مشكلة في الكود ويرجع سبب الحصول على أرقام أخرى أن عملية البحث غير مطابقة وإنما باللواصق (ما قبلها وما بعدها) "*" & Me.TextBox1 & "*" فلو بحثنا عن الرقم 2 يجلب لنا 2 و 12 و 22 و 25 و 32 وهكذا وإذا أردنا أن يكون البحث عن الأرقام مطابقا يجب إضافة شرط لمعيار البحث باستبدال السطر الثاني إلى هذا السطر clé = IIf(Me.combobox1.Value = "الرقم" Or Me.combobox1.Value = "عدد الحروف" Or Me.combobox1.Value = "عدد الكلمات", Me.TextBox1, "*" & Me.TextBox1 & "*"): n = 0 بالتوفيق
  17. عليكم السلام يمكنك وضع هذه المعادلة في الخلية F3 =(SUM(B3,E3)-SUM(A3,D3))*24 بالتوفيق
  18. أخي الكريم يجب كتابة المطلوب بالتفصيل الممل حتى يفهم الجميع ويساعدوك
  19. من الواضح أن إجراء التمكين غير موجود والذي يسمى enableply لذلك يمكنك استعمال هذين الاجرائين للتعطيل Private Sub Workbook_Open() Application.CommandBars("Ply").Enabled = False End Sub للتمكين Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.CommandBars("Ply").Enabled = True End Sub بالتوفيق
  20. يمكنك استعمال هذه المعادلة في B3 =WORKDAY.INTL(A3-1,D3,16) بالتوفيق
  21. المشكلة ليست في الكود المشكلة في تنسيق الخلية ونوع التقويم
  22. جرب هذه المعادلة =IF(M4*0.0199<1.99,1.99,IF(M4*0.0199>=0.299*F4,0.299*F4,M4*0.0199)) على اعتبار أن قيمة الصفقة هي الخلية F4 بالتوفيق
  23. هذا الرمز يخبر اكسل أن ينتج قيمة واحدة كما هو الحال في معادلة المصفوفات القديمة جرب أن تحذف معادلات العمود كله وتكتب المعادلة بدون @ في أول خلية فقط مع الضغط على انتر فقط حيث أن هذا النوع من المعادلات يحتاج إلى نطاق فارغ ليظهر جميع النتائج وإلا يظهر الخطأ SPILL بالتوفيق
  24. يمكنك تجربة هذه المحاولة بالمعادلات بدلا من تصدير النتائج في شيت جديد يمكنك كتابة مصطلح البحث والحصول على النتائج في شيت النتائج أهم شيء معادلة المسلسل في شيت البيانات data لأن معادلة البحث vlookup تعتمد عليها بالتوفيق فلترة نتائج البحث في شيت جديد.xls
×
×
  • اضف...

Important Information