shreif mohamed

الشكر لله ، اسعد الله اوقاتكم بالنسبة للمستقطع والصافي هل تريد اي تعديل عليهم تقريب / اضافة اي ملاحظة خاصة بهم حيث انني وجدت انك تعتمد علي الخلية k11 والتي تم تغيير قيمتها بتصحيح المعادلة والنتائج الموجودة في الخليه m12 تخالف النتائج المرجوة في الخلية بداء من الخلية t12 فاذا كان الامر كذلك اريد منك قوانين كيفية توزيع المستقطع والصافي في خانتي القرش والجنيه

IN K1 =MOD(B11+(A11/100)-((D11+F11+H11+J11)+((C11+E11+G11+I11)/100)),1)*100 ثم السحب لاسفل يتبع لتصحيح باقي المعادلات

تفضل اخي قم بتمكين الماكرو اولا ثم الضغط علي زر جلب البيانات الموجود بالشيت الاول النتيجة.rar

وعليكم السلام تابع معي سوف اقوم بارفاق ملف لك قريبا ان شاء الله

لماذا لم تقم بارفاق ملف بالتعديل والتوضيحات المطلوبة

من فضلك ارسل صورة من رسالة الخطا التي تظهر عند الحفظ

بالنسبة للاجهزة التي يوجد بها المشكلة هل المشكلة مقتصرة علي حفظ الملف اي ان الماكرو يعمل بشكل طبيعي ام ان الماكرو يوجد به مشاكل اثناء عمله ؟ ثانيا هل الشيت موجود داخل وحدة التخزين بالجهاز ام يتم العمل عليه من خلال شبكة تم مشاركة ملف الاكسل بها ؟

شكرا اخي علي كلماتك الطيبة وبارك الله فيك ولكني حتي الان لم استطع فهم ماتريد فعزرا مني كنت اظن ان ماتريده هو الموجود تحت الخلية المعنونة بـــــ "النتيجة المرجوة بخانتى القرش والجنيه" اي انت تريد نفس القيم الموجودة اسفل هذا العنوان فيرجي حذف جميع الخلايا التي ليس لها اهمية حتي لا يتم تشتيت الانتباه ايضا تظليل الخلايا المراد اظهار النتائج بها ولا بئس في اضافة شرح لما تريده في تعليق او اضافة شكل مكتوب به الشرح

Private Sub worksheet_SelectionChange(ByVal Target As Excel.Range) ' حيث اسم الشيت المطلوب عدم تغيير اسمهMaster If ActiveSheet.Name <> "Master" Then ActiveSheet.Name = "Master" End If End Sub [/CODE)

وعليكم السلام ورحمه الله وبركاته p13=TRUNC(E2-SUM(F2:I2)) n13=TRUNC(SUM(F2:I2))+E2-SUM(F2:I2)-TRUNC(E2-SUM(F2:I2)) k13=E2-SUM(F2:I2)-TRUNC(E2-SUM(F2:I2))

تفضل وعزرا للتاخير لا تقم بمسح اي من الشيتات المضافة وستجدما ماتطلبه في شيت رقم 3 وكل ما عليك فعله هو الضغط علي زر جلب البينات الموضح مشكلة قائمة الدخل.rar

وعليكم السلام اخي كلنا نطمع في عفو الله وكرمه اسال الله ان يعفو عنا ويكرمنا جميعا تفضل المرفق ولاحظ الاعمدة المضافة سوال.rar

In G3 =IF(OR(ISERROR(MATCH($C3,$I$5:$I$15,0)*MATCH($D3,$J$5:$J$15,0)*SUMPRODUCT(--($K$5:$O$5=$F3)*1)*1*--(DATEDIF(E3,TODAY(),"d")>365)),DATEDIF(E3,TODAY(),"d")<365),"علاوة","ترفيع") Drag down

وعليكم السلام يوجد عوائق كثيرة لاستخدام المعادلات في الشيت المرفق اهما الخلاية المدموجة هل تفكر في حل عن طريق الماكرو ؟ فقط اعلمني اذا كنت ترغب في ذلك

inside B2 =INDEX($J$3:$J$9,MATCH($A2,$L$3:$L$9,-1))

اخي وليد هل تريد عندما يكون احد الخليتين فارغة ان لا يكون الناتج 0 وفي معادلتك تظهر 1 حيث ان 0+1 = 1 حيث ان الدالة تستخدم في التقريب الي اقرب رقم صحيح بعد الكسر هل تريد ان يظهر ناتج الخلية المقربة مضافا اليها واحد بغض النظر عن فراغ احد الخلايا =IF(AND(K8<>"",E8<>""),CEILING((K8*E8),1)+1,IF(K8="",CEILING(E8,1),IF(E8="",CEILING((K8),1))))

=IF(OR(14,16,18,20,25,32,35),(D2/1000)*60,"")

قوائم فصول.rar

تفضل ياخي Book2.rar

Sub oct2017() Selection.Copy Sheets("sheet2").Select Range("C4").PasteSpecial xlValues End Sub

تفضل ياخي كشف حساب.rar الخطئ في في كنابة cells مكتوبة sells

تفضلي ياخي وعزرا للتاخير Book ahmed all.rar

xlsx لا يوجد كود يمكن ان يعمل علي امتداد xlsb وتبقي هذه الميزة حصرية للملفات بامتداد customers اذا كنت تريد ان يظهر الكمبو بوكس البيانات من شيت فاستطيه ان اعدل الكود لك xlsbولكن يبقي الشيت بامتداد

تفضل ياخي قمت بازالة التكرارات من الكومبو وبالنسبة للترتيب يمكن ببساطة ترتيب جدول البينات وسوف تظهر الاسماء في الكومبو مرتبة ايضا اعتقد انه من الصعب الاستغناء عن هذه الاضافة لفعل ذلك Book ahmed all.rar