فلتر متقدم

[أبو جاسم]

السلام عليكم

ياجماعه محتاجد اني اعمل تقرير ببانه يجبلي بيانات موظف واحد بس

الشرح موجود في الملف

calculation-SALIM.rar

تم تعديل سبتمبر 10, 2016 بواسطه محمد سعيد س
رفع ملف

[سليم حاصبيا]

جرب هذا

 

 

calculation-Repport.rar

[أبو جاسم]

تسلم يااستاذ سليم هو ده فعلا المطلوب

الف شكر لحضرتك

جزاك الله خير

 

[أبو جاسم]

استاذ سليم

تحياتي

أستاذن حضرتك إن المعادلات واقفه لحد رقم 857 في الصفوف ومش بتقرا اكتر من كده

وحاولت افتح الصفوف اكتر بس مقدرتشcalculation-Repport.rar

ياريت لو تفتح المعادلات للصفوف كاملة علشان اقدر اجيب الشيت كامل

[أبو جاسم]

استاذ سليم

انا اسف بس لو تقدر تحللي المشكله

اشكرك

[سليم حاصبيا]

1-استبدل الرقم 857 في المعادلة (أول خلية بالنطاق A3 ) بالرقم الذي تريد

2- اضغط Ctlr+Shift+Enter (معادلة صفيف)

3-اسحب المعادلة يميناً حتى H3  ثم نزولاً قدر ما تريد من الصفوف

[أبو جاسم]

عملت زي ما حضرتك طلبت وعملت الرقم 5000 بس دي كانت النتيجة مش ضابطه معايا

 

calculation-Repport.rar

[قلم-الاكسل(عبدالعزيز)]

فعلا المهندس سليم لم ينجح حاولت 3 محاولات لاني محتاج لمثل هذا الملف مثل الاخ طارح الموضوع

غيرت الرقم من 857 الى 6000  ثم سحبتها من A3 الى H3 فظهؤت النتائج عند الصف الرابع غير صحيحة عبارة عن خطوط وسحبتها الى مستوى 6000 صف فلم ينجح

 

[سليم حاصبيا]

  في 10‏/9‏/2016 at 19:29, محمد سعيد س said:

عملت زي ما حضرتك طلبت وعملت الرقم 5000 بس دي كانت النتيجة مش ضابطه معايا

 

calculation-Repport.rarFetching info...

Expand  

يجب ان تكون محتويات العامود C في الورقة All ارقاماً وليست نصوصاً (هل 005 هي رقم او نص برأيك)

للتحويل الى ارقام انسخ العامود C الى اي مكان (فليكن صفحة جديدة مثلاُ) و اضرب كل محتوباته ب 1

ثم انسخ النتيجة و راجعها الى العامود  C    Paste Value 

او يمكنك استعمال هذا الماكرو (قم بتنفيذه بعد ان تحدد كل محتويات العمود C)

Sub test_to_val()
For Each cel In Selection
If cel.Value <> "" Then
  On Error Resume Next
  cel.Value = cel.Value * 1
  If Err.Number <> 0 Then
   cel.Value = Application.WorksheetFunction.Trim(Replace(cel.Text, Chr(160), Chr(32)))
   cel.Value = Application.WorksheetFunction.Clean(Replace(cel.Text, Chr(127), Chr(7)))
   End If
   End If
   Next
  
End Sub

انا قمت بتحويل بعضهاالى ارقام وهي التي تعطي النتائج التي تراها 

[أبو جاسم]

انا مش عارف اعملها

انا اسف

[أبو جاسم]

هل ممكن حضرتك تححلها وتساعدنا

 

[أبو جاسم]

السلام عليكم

استاذ سليم

كل عام وحضرتك بخير

 

[عادل ابوزيد]

الاساتذة الكرام

معادلة استاذنا سليم من النوع معادلات الصفيف بعنى اى تغيير يطرأ على المعادلة يجب ان تضغط على ctrl+shift+enterمع بعض وبعد ذلك اسحب الخلية كما اشار استاذنا وان شاء الله ستحل المشكلة

 

[محي الدين ابو البشر]

السلام عليكم

هكذا؟

calculation-Repport.rar

[أبو جاسم]

شكرا جدا استاذ محيي الدين

جزاك الله خير