المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : كيف انشاء دالة في اكسل


an_isma43
2012-12-20, 14:36
السلام عليكم ورحمة الله تعالى وبركاته

مرحبا اخواني أعضاء منتدى الجلفة


أود انشاء دالة جديدة واضعها في الاكسل
يعني عندما افتح برنامج اكسل وأذهب الى قائمة الدوال اجد الدالة التي انشأتها
لغة كتابة الدوال اكسل هل هيc++
ممكن أمثلة
شكرا
بارك الله فيك

an_isma43
2012-12-22, 18:21
41 مشاهدة ولا احد يرد

محمد بنايلي
2012-12-27, 08:17
شكرا اخي لك

__الهاوي__
2012-12-27, 19:07
أولا أنبهك أن الدوال في الاكسل تكون بالفيجول بيسك VBA
للذهاب إلى محرر الكود إضغط على ALT+F11
اختر موديل جديد
انسخ هذا الكود مثلا لإضافة دالة القسمة لـ س على ع
مع شرط القسمة غير ممكنة حالة كان المقام معدوما

Function division(x, y)
If y > 0 Then
division = x / y
Else
division = "division impossible"
End If
End Function

عد إلى مستند الاكسل عن طريق ALT+F11
أدرج دالة ومن نافذة الدوالة الخاصة، ستجد اسمها وبارامتراتها.

أحسن طريقة تعلمك خواص الاكسل هي تسجيل الماكرو والاطلاع على الكود الخاص به
إذا كنت تعمل على الاكسل 2007 فينبغي أن تكون صفحة الماكرو ظاهرة، وتجدها في خواص الاكسل "Show Developer Tab"
لتسجيل الماكرو اضغط على record macro
اعط اسم ووصف للماكرو
الماكرو الآن قيد التسجيل، لاحظ stop في شريط الحالة للاكسل
قم بعمليات على الاكسل، نسخ لصق حفظ إدراج حذف...
أوقف تسجيل الماكرو بالضغط على المربع في الأسفل أو من القائمة للـDeveloper Tab
ستجد الماكرو الذي أضفته وكود طويل فيه كل العمليات التي قمت بها
هذا هو أحسن أسلوب لتعلم البرمجة بالـVBA
على فكرة، الاسلوب أيضا يعمل مع الوورد.
بالتوفيق إن شاء الله

an_isma43
2013-01-09, 12:07
أولا أنبهك أن الدوال في الاكسل تكون بالفيجول بيسك VBA
للذهاب إلى محرر الكود إضغط على ALT+F11
اختر موديل جديد
انسخ هذا الكود مثلا لإضافة دالة القسمة لـ س على ع
مع شرط القسمة غير ممكنة حالة كان المقام معدوما

Function division(x, y)
If y > 0 Then
division = x / y
Else
division = "division impossible"
End If
End Function
عد إلى مستند الاكسل عن طريق ALT+F11
أدرج دالة ومن نافذة الدوالة الخاصة، ستجد اسمها وبارامتراتها.

أحسن طريقة تعلمك خواص الاكسل هي تسجيل الماكرو والاطلاع على الكود الخاص به
إذا كنت تعمل على الاكسل 2007 فينبغي أن تكون صفحة الماكرو ظاهرة، وتجدها في خواص الاكسل "Show Developer Tab"
لتسجيل الماكرو اضغط على record macro
اعط اسم ووصف للماكرو
الماكرو الآن قيد التسجيل، لاحظ stop في شريط الحالة للاكسل
قم بعمليات على الاكسل، نسخ لصق حفظ إدراج حذف...
أوقف تسجيل الماكرو بالضغط على المربع في الأسفل أو من القائمة للـDeveloper Tab
ستجد الماكرو الذي أضفته وكود طويل فيه كل العمليات التي قمت بها
هذا هو أحسن أسلوب لتعلم البرمجة بالـVBA
على فكرة، الاسلوب أيضا يعمل مع الوورد.
بالتوفيق إن شاء الله

شكرا لك اخي على هاته الاجابة
ممكن اخي تمر على هذا الموضوع
http://www.djelfa.info/vb/showthread.php?p=12659635