استدعاء بيانات بتواريخ معينة

[وليد المصرى 1]

السلام عليكم ورحمة الله وبركاتة

ارجو من الاخوة الأعضاء المساعدة في استدعاء بيانات من شيت اكسيل على حسب فترة من تاريخ كذا الى تاريخ كذا يوجد معادلات في الملف ولكن تعطينى ناتج تاريخ واحد فقط ولكن الذى اريدة هو حساب فترة من تاريخ معين الى تاريخ اخر

 

جزاكم الله الف خير

 

ACC.rar

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

جرب هذا الملف

 

ACC SALIM.rar

جرب هذا الملف

 

[وليد المصرى 1]

تسلم ايدك اخى سليم

ممكن الحل بالاكود اذا امكن

 

بس سؤال لما بقف على الخلية واعمل دبل كليك المعادلة بتتغير ولا تعطى ناتج

 

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

3 ساعات مضت, goodlife said:

تسلم ايدك اخى سليم

ممكن الحل بالاكود اذا امكن

 

بس سؤال لما بقف على الخلية واعمل دبل كليك المعادلة بتتغير ولا تعطى ناتج

 

لتعمل المعادلة يجب الضغط على Ctrl+Shift + Enter   وليس Enter وحدها

[ياسر خليل أبو البراء]

12 ساعات مضت, goodlife said:

تسلم ايدك اخى سليم

ممكن الحل بالاكود اذا امكن

 

بس سؤال لما بقف على الخلية واعمل دبل كليك المعادلة بتتغير ولا تعطى ناتج

 

تأكد أخي الكريم من التبويب Formulas ثم Calculaton options وتأكد أن الخيار هو Automatic وليس Manual

وأيضاً لا تنسى الضغط على Ctrl + Shift + Enter لأنها معادلة صفيف كما أخبرك أخي سليم

تقبل تحياتي

[وليد المصرى 1]

السلام عليكم اشكركم شكرا جزيلا

 

ازاى أطول المدا .

IF(ROWS(E$5:E6)>$E$1,"",INDEX(GG!E$7:E$400,SMALL(IF(GG!$B$7:$B$400<>"",IF(GG!$B$7:$B$400<=$D$2,IF(GG!$B$7:$B$400>=$C$2,ROW(E$7:E$400)-ROW(E$7)+1))),ROWS(E$5:E6))))

اعتقد من هنا التمديد الرقم 400

[وليد المصرى 1]

هل يوجد حل تحويل المعادلات الى اكواد في الملف اخى الفاضل

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

جرب هذا الكود

Sub formula_to_code()
Range("b5").FormulaArray = "=IF(ROWS($B$5:B5)>$E$1,"""",INDEX(GG!A$7:A$2252,SMALL(IF(GG!$B$7:$B$2252<>"""",IF(GG!$B$7:$B$2252<=$D$2,IF(GG!$B$7:$B$2252>=$C$2,ROW($B$7:$B$2252)-ROW($B$7)+1))),ROWS($B$5:B5))))"
Range("b5").AutoFill Range("b5:H5")
Range("b5:H5").AutoFill Range("b5:H2252")
End Sub

 

[وليد المصرى 1]

اشكرك اخى الفاضل

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

ممكن كود بس اكتب التواريخ يعطينى النتيجة بدون ما اكبس على زر