فرمول Randbetween

[Amir Mohsenpour]

برای استفاده بهتر دوستان فایل اکسل آنرا هم ضمیمه نموده ام

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[m_d6712]

خوب این چه فرقی می کنه با این که بنویسیم؟

Minvalue+(maxvalue-Minvalue)*Random()

[mrexcel]

اين تابع minvalueوmaxvalue آيا جزو توابع صفحه اكسل است يا محيط vb?

[m_d6712]

Minvalue و Maxvalue می تونه یک خونه از خود Excel bashe

مثلا به این صورت:

C1+(C2-C1)*Random()

در کد های VBA هم میشه از توابع اکسل استفاده نمود.

کلاس WorksheetFunction که خودش یک Property از کلاس Application می باشد. دارای متد هایی است که همان توابع داخل اکسل می باشد. :

Dim Minvalue as integer
Dim Maxvalue as integer
Minvalue = 100
Maxvalue = 200

Dim random as double
random = Minvalue + (Maxvalue-Minvalue) * Application.WorksheetFunction.Random()

[mrexcel]

بسياري از خروجي هاي اكسل در اين نرم افزار از مسيرهاي مختلفي بدست مي آيد. ما بايد ببينيم كدام روش ساده تر و كاربردي تر است

[Amir Mohsenpour]

خوب این چه فرقی می کنه با این که بنویسیم؟

Minvalue+(maxvalue-Minvalue)*Random()

جهت اطلاع شما دوست عزیز این مطلب کاملاً با آن موضوعی که شما می فرمائید تفاوت دارد چرا که در قسمت مربوط به توابع اکسل صحبت از نوشتن کدهای Vb نخواهد بود بلکه فقط و فقط از توابع موجود در اکسل صحبت خواهیم کرد.
ضمن اینکه نوشتن فرمول Randbetween بسیار ساده تر از توضیحات جنابعالی و کاربردی تر خواهد بود.
اضافه براین اگر قرار به نوشتن چنین کدهای گیج کننده ای با استفاده از ترکیب کردنهای مختلف بود می توانستیم از ترکیب فرمولهای Rand و Round نیز استفاده نمائیم.

[mr.mahlouji]

با سلام
امير جان با نظر شما كاملا موافقم.پيشنهاد ميكنم در اين تالار هاي گفتگو كه هدف ، آموزش بسيار روان و ساده است بنحوي مطالب بازگو گردد كه كليه كاربران مبتدي بتوانند به سادگي اكسل را ياد بگيرند. چرا كه اگر با چنين كدنويسي هاي مشكلي روبرو شوند ، چه بسا به كلي اكسل را كنار بگذارند .
بهرحال از توضيحات اين دوست خوبمان هم تشكر ميكنم.
كوچك شما