ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ³o°Ý°}¦Cªº¬Û¥[¬O§_¦³¨ä¥¦ªº¼gªk¦³§ó§Öªº°õ¦æ³t«×

[µo°Ý] ³o°Ý°}¦Cªº¬Û¥[¬O§_¦³¨ä¥¦ªº¼gªk¦³§ó§Öªº°õ¦æ³t«×

Function Cal_Avg_xDay(Date_I, xDay) As Double   ' ­p¼Æ¤ë½u/©u½u
ReDim xDay_Sum(xDay)
For j = 1 To xDay
   xDay_Sum(j) = AR(3)(Date_I - j + 1, BT_Stock_I)
Next
Cal_Avg_xDay = WorksheetFunction.Round(WorksheetFunction.Average(xDay_Sum), 2)
End Function

§Ú¼g¤F¤@­Ó function, ¥Î¨Ó­pºâªÑ»ùªº¤ë½u/©u½u¡C¶Ç¤J­È¬°·í¤é¤é´Áªºindex¡AxDay¬°20or60¡C
½Ð°Ý¦³¨ä¥¦¸û²¼äªº¼gªk¥H¤Î§ó§Öªº°õ¦æ³t«×¶Ü¡AÁÂÁ¡C
¤pµæ³¾¤@­Ó ½Ð¦h«ü±Ð~

¦^´_ 1# kasl

¤£­n¥Îworksheetfunction ·|§ó§Ö
ss

TOP

        ÀR«ä¦Û¦b : ¡i»X½ªªº¦Û¥Ñ¡j¤H±`¦b¤°»ò³£¥i¥H¦Û¥Ñ¦Û¦bªº®É­Ô¡A«o³Q³oºØÀH¤ß©Ò±ýªº¦Û¥Ñ»X½ª¡AµêÂY®É¥ú¦Ó²@µLıª¾¡C
ªð¦^¦Cªí ¤W¤@¥DÃD