هل يمكن إظافة دالة جديدة لأكسيل؟

[إيمان]

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

تحية طيبة للقائمين على هذا المنتدى الرائع

لدي إستفسار أتمنى أن أجد إجابة عندكم

هل يمكن إضافة دالة جديدة إلى دوال الأكسيل وتسميتها وإستخدامها لاحقا

ارجوا الإجابة بالتوضيح لأنه ليس لدي خبرة في هذا البرنامج

ولكم من جزيل الشكر

[محمد طاهر عرفه]

راحعي الوصلات المشار اليها هنا

http://www.officena.net/ib/index.php?showt...indpost&p=41646

و باختصار للتجربة

اولا تأكدي من تفعيل الماكرو

Tools

options

macro

security

loaw or medium

ثانيا

اضغطي

ALT + F11

سيفتح محرر البيزيك

اختاري ادراج موديول جديد

insert module

ابدأي اضافة كلمة

function mm

ثم

enter

ستجديها تحولت الي

Function mm()

end function

و بين السطرين يمكن كتابة تعليمات الدالة و لنقل مثلا انت تريدين دالة تضرب الرقم فى 3 ثم تضيف 1 اذا لنعدل الدالة لتتلقي متغير ثم نكتب الدالة

Function mm(mynumber)
 mm = mynumber * 3 + 1
End Function

و الان لنغلق المحرر و نعود لورقة العمل في الاكسيل و لنستدعي الدالة من زر fx user defined functions و بكتابة الدالة مباشرة فى خلية مشيرة الي خلي أخري

=mm(C8)

مرفق المثال

function.zip

[إيمان]

جزاك الله بكل خير وجعله في موازين حسناتك