نوشتن تابع سیگما در اکسل

[amin.t]

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

aⁿ∑

رو میشه نوشت؟ بطوری که n از بازه 1 تا عدد 360 باشه

خیلی ممنون می شم که راهنمایی کنید

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

[iranweld]

سلام

با ویژوال بیسیک از کدهای ذیل استفاده کنید

Sub TEST()

Dim XX As Double

XX = 0

x = Range("B2").Value

y = Range("C2").Value

For I = x To y

XX = XX + Range("A2").Value ^ I

Next

MsgBox XX

End Sub 

[abootorab]

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

aⁿ∑

رو میشه نوشت؟ بطوری که n از بازه 1 تا عدد 360 باشه

خیلی ممنون می شم که راهنمایی کنید

با درود و تشکر از جناب iranweld
علاوه بر پاسخ دوست خوبم جناب iranweld، اگر بدون استفاده از vb بخواهید این کار را انجام دهید ابتدا سلولهای A1 تا A360 به حالت انتخاب در آورید سپس در نوار فرمول، فرمول زیر را بنویسید:

=IF(ROW(A:A)<=$B$2;$B$1^ROW();"") 

دقت داشته باشید بعد از وارد کردن فرمول فوق به جای کلید Enter از کلیدهای ترکیبی Ctrl+Shift+Enter استفاده کنید.

و در نهایت با فرض قرار گرفتن مقادیر a و n به ترتیب در سلولهای B1 و B2، در سلول B3 نیز فرمول زیر را وارد کنید:

=SUMIF($A:$A;"<>";$A:$A) 

فایل نمونه ضمیمه گردید.

[amin.t]

سلام

با ویژوال بیسیک از کدهای ذیل استفاده کنید

Sub TEST()

Dim XX As Double

XX = 0

x = Range("B2").Value

y = Range("C2").Value

For I = x To y

XX = XX + Range("A2").Value ^ I

Next

MsgBox XX

End Sub 

با درود و تشکر از جناب iranweld
علاوه بر پاسخ دوست خوبم جناب iranweld، اگر بدون استفاده از vb بخواهید این کار را انجام دهید ابتدا سلولهای A1 تا A360 به حالت انتخاب در آورید سپس در نوار فرمول، فرمول زیر را بنویسید:

=IF(ROW(A:A)<=$B$2;$B$1^ROW();"") 

دقت داشته باشید بعد از وارد کردن فرمول فوق به جای کلید Enter از کلیدهای ترکیبی Ctrl+Shift+Enter استفاده کنید.

و در نهایت با فرض قرار گرفتن مقادیر a و n به ترتیب در سلولهای B1 و B2، در سلول B3 نیز فرمول زیر را وارد کنید:

=SUMIF($A:$A;"<>";$A:$A) 

فایل نمونه ضمیمه گردید.

از دوستان و اساتید محترم کمال تشکر رو دارم
واقعا عالی بود