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

الردود الموصى بها

قام بنشر (معدل)

السلام عليكم

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

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

calculation-SALIM.rar

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

استاذ سليم

تحياتي

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

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

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

قام بنشر

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

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

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

قام بنشر

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

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

 

  • Like 1
قام بنشر
2 ساعات مضت, محمد سعيد س said:

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

 

calculation-Repport.rar

يجب ان تكون محتويات العامود 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

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

  • Like 1
قام بنشر

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

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

 

  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • اضف...

Important Information