ايران ويج

نسخه‌ی کامل: نوشتن توضیح در فانکشن Add-in
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
در فانکشنی که در Add-In تعریف می‌کنیم چطور می‌شود توضیحی نوشت که در روی شیت در ویزارد آن نمایش داده شود؛ مثل فانکشن‌های خود اکسل.
اینو نگاه کن:
http://spreadsheetpage.com/index.php/tip...xcel_2010/

اینا هم عدد‌هایی واسه کاتالوژي
کد php:
0 No category appears only in All
1 Financial
2 Date 
& Time
3 Math 
& Trig
4 Statistical
5 Lookup 
& Reference
6 Database
7 Text
8 Logical
9 Information
10 Commands normally hidden
11 Customizing normally hidden
12 Macro Control normally hidden
13 DDE
/External normally hidden
14 User Defined 
default
15 Engineering only available if the Analysis Toolpak add-in is installed 
مخصوصا برای اون لینک متشکرم خود سایت هم خیلی بدرد بخور بود ولی متن کد رو متوجه نشدم.
فاقد ویندوزم واسه تست

ولی چیزی که فهمیدم این خط:
کد php:
Application.MacroOptions _
      Macro
:=FuncName, _
      Description
:=FuncDesc, _
      Category
:=Category, _
      ArgumentDescriptions
:=ArgDesc 

درمورد توضیحات تابع هست! شما میتونید با این قسمت در مورد تابع خودتون و ارگومان ها و خورجی ‌ها و ... توضیح بنویسید..

------
اینکه چطوری کار میکنه رو باید تست کنم
خودتونم با روش سعی و خطا تست بگیرید؛ پارامترهایشو عوض کنید و نتیجه رو ببینید و .. بلاخره یه چیزی از آب در میاد Biggrin
مهندس روش کار این هم خیلی سادست

برایا نیکه کار کنه باید برای یکبار, تابع
کد php:
DescribeFunction 
رو که توش توصیحاتی برای توایع هست رو اجرا کنید؛

همین! و بعدش تویضحات تایع مربوطه تون خیلی زیبا میاد!

کد php:
Function EXTRACTELEMENT(Txt, n, Separator) As String
     EXTRACTELEMENT 
= Split(Application.Trim(Txt), Separator)(n - 1)
End Function

Sub DescribeFunction()
   
Dim FuncName As String
   Dim FuncDesc 
As String
   Dim Category 
As String
   Dim ArgDesc
(1 To 3) As String

   FuncName 
= "EXTRACTELEMENT"
   
FuncDesc = "Returns the nth element of a string that uses a separator character"
   
Category = 7 'Text category
   ArgDesc(1) = "String that contains the elements"
   ArgDesc(2) = "Element number to return"
   ArgDesc(3) = "Single-character element separator"

   Application.MacroOptions _
      Macro:=FuncName, _
      Description:=FuncDesc, _
      Category:=Category, _
      ArgumentDescriptions:=ArgDesc
End Sub 

اول تابع DescribeFunction رو اجرا کنید؛ و بعد از توی لیست توایع خود اکسل؛ از قسمت Text تایع EXTRACTELEMENT رو پیدا کنید و توضیحاتش رو میتونید به راحتی ببینید..