股票代码循环

时间:2018-02-16 13:45:49

标签: vba excel-vba loops excel

enter image description here

我创建了一个循环,并计算每个股票代码的年度变化。如图所示,我没有为第二个股票代码“AA”获得正确的价值。 我试图让循环遍历所有数据,并获得年份开放和年度结束的价值,这使我每个股票的年度变化

这是我的代码:

{{1}}

1 个答案:

答案 0 :(得分:0)

考虑不使用VBA而是使用数组公式计算自动收报机最小和最大日期,并使用相应的最小打开和最大关闭值行号。最后,所需的列 YearDiff 根据以上计算的行号使用INDEX/MATCH公式。

为了演示,下面是使用带有计算列的随机数据的屏幕截图: MinOpen MinDate MaxClose MaxDate 。第一行的相应公式如下。

Excel Spreadsheet Screenshot

YearDiff : =INDEX($A$1:$F$21, O2, 6) - INDEX($A$1:$F$21, L2, 3)

MinOpen  : {=MATCH(I2&M2,A:A&B:B,0)} 
MinDate  : {=MIN(IF(A:A=$I2,B:B))}

MaxClose : {=MIN(IF(A:A=$I2,B:B))}
MaxDate  : {=MAX(IF(A:A=$I2,B:B))}

注意:要创建使用大括号显示的数组公式,请在单元格中键入相等表达式,然后按CTRL + SHIFT + ENTER。从那里,下拉其他行的公式。