السادة الاعضاء
ارجو مساعدتي في عمل معادلة تبحث داخل رينج معين عن رقم او كود ويكون الناتج رقم الخلية وموقعها كما هو موضح بالملف المرفق
شكرا
مطلوب بحث عن رقم الخلية.rar
اخي العزيزي الخالدي
انا جربت ولا نتيجة ممكن يكون عدم فهم مني
بس بالنسبة لطلبي ان يكون وضع المعادلة بفورم مثل الذي بالمرفق الخاص بي هل صعب ومستحيل
شكرا اتعبتكم
شكرا رجب علي الرد
بس لو امكن تنظر الي المرفق انا احتاج الي فورم ليكون موضع كتابة المعادلة في اي خلية ويكون متغير
حتى لا احتاج عند تعديل الاعمدة للدخول وكتابة الكود مرة أخري
ارجو ان اكون استطعت توصيل المعلومة والمطلوب
اخوكم احمد
sample.zip
السلام عليكم ورحمة الله
ارجو هذه المرة مساعدتكم
مرفق صورة توضح الشكل المطلوب وللمرة الثانية اطلب معادلة الصفائف بالكود
شكرا لكم علي كل حالة بس ارجو في حال عدم الاستطاعة الرد بعدمها
كل عام وانتم بخير واعلم ان الصيام هذا العام اطول يوم
بس ارجو من خبراء الكواد كتابة معادلة في خليه من نوع الصفائف عن طريق الكود بحيث يظهر مثلا فورم ادخل فيه رقم الخلية واكتب به المعادلة فتظهر في الخلية بأقواس الصفائف (المصفوفة)
شكرا : اخوكم في الله من مصر
Function GetFormula(Cel As Range)
GetFormula = Cel.Formula
If Cel.HasArray Then GetFormula = "{" & Cel.Formula & "}"
End Function
وهذه معادلة بطريقة المصفوفة ..............=INDEX($IM$2:$IP$325;MATCH(O2&"-"&P2;$IN$2:$IN$325&"-"&$IM$2:$IM$325;0);4)
واحتاج الي عمل طريقة بالكود بعد كتابة المعادلة في الخلية بتحويلها الي مصفوفة بدل الضغط علي كنترول وشيفت وانتر وهل الكود اعلاه هو المطلوب وما طريقة تشغيله
شكرا
جزاك الله خير يا ابو حميد استاذ من يومك
الف شكر
للعلم انا اعتقد انك من المدينة المنورة وانا عشت عامين بالمدينة وكان نفسي اتشرف بيك واتعرف علي واحد مثلك
اني احبك في الله
اخوك
ahmed00
اعزائي
المرفق ملف مطلوب عمل طريقة حساب اوتو ماتيك بحيث يكون التاريخ متغير
علي العموم يوجد شرح للمطلوب بشكل اوضح بس ارجو المطلوب لو بالكود ماشي جدا بس لو مفيش مانع للمعادلات
شكرا
علي ردكم مقدماً
ahmed00
Interest free loan.zip
شكرا علي الردود وكلها ما شاء الله جميلة بارك الله لكم في علمكم
بس انا دخلت علي النت ووجدت الكود ده
Dim NamedRange As Name
For Each NamedRange In ActiveWorkbook.Names
NamedRange.Delete
Next NamedRange
وشغال تمام
شكرا
أحمد
ارجو التكرم والتفكير معي
هل هذا الكود يمكن تعديله بشكل يمسح اكثر من مساحة اي كلها
ActiveWorkbook.Names("NEW1").Delete
ActiveWorkbook.Names("NEW2").Delete
بحيث تكون هكذا
ActiveWorkbook.Names.Delete
شكرا
أخوكم احمد
اولاً شكرا علي الرد
اخي خبور
بس انا كنت عامل كدة فعلاً بس في بعض التوايخ يختلف اليوم بها وعند عمل فيلتر لا يقوم بلاستعلام عن الشهر المحدد فقط بسبب الاختلاف
فأحتاج لتكون بدون معادلة وتتحدث تلقائي وهذا متاح بالكود
شكرا
أخوك احمد
اعزائي
المطلوب ممكن يكون ان شاء الله سهل
الطلب الاول : عند كتابة 1-1-2011 في خلية يكتب بالخلية التالية1-2-2011 وهكذا
الطلب الثاني : ارجو نسخ عمود تاريخ الي عمود اخر بتنسيق مختلف علي ان يكون الشهر فقط
شكرا
أخوكم احمد
Copy.zip
مواضيعي المتواضعه في المنتدى ( احمد حمور-ابوعبدالله )
برنامج متنوع / ذمم / اكواد / شيكات
]دليل هاتف V2 باستخدام كيبورد احرف وارقام
كن جريئا وصمم برنامجك بنفسك
شاشة دخول متعددة الوظائف
دليل هاتف متطور
عرض الفورم بدون ملف الاكسل
طريقه لعمل نسخه احتياطيه للملف
ملف ذمم جديد من نوعه
ملف ذمم بمبدأ داتا ليست
شرح لبعض ادوات الماكرو بطريقه بسيطه
اخي العزيز كل ما في تطلب في مواضيع اخي العزيز احمد حمور-ابوعبدالله
في توقيعه بعد اي رد في الاسفل ادخل وخذ اللي انت عايزه
شكرا