Excel 2010 VBA基于定义的variables在指定的单元格中重复公式
也问在这里 。
我有一个“报告段”的导出，每段总是22行，第一个导入到Excel时总是从第5行开始。 最后一行（包含“报告结束”特殊字符）为247的文档将包含11个报告分段。
在每个报告部分，都有两个不同的公式需要。
对于第一个报告部分，始终位于A5到J27行：
在Excel 2010中使用VBA，我需要将FORMULA1放在范围（D5：D15拖到H5：H10（不是15）和D18）和单元格（F20：F22，J20：J22）中的FORMULA2的所有单元格中。
然后我需要重复 vTaskCount次数（段数）和间隔22（段转发器偏移量）。 有些报告可能有2个部分，有些可能有50个，但结构总是相同的。 我希望，因为我可以告诉它重复这个过程的次数，它会使它更简单。
尝试这样的事情：
sub whatever() dim lNumSegs as long, lLoop as long lNumSegs=(cells(rows.count,1).end(xlup).row-5)/22 for lLoop =1 to lnumsegs range(D5:D15).offset((lloop-1)*22).formular1c1="=FOrmula1" range(H5:H10).offset((lloop-1)*22).formular1c1="=FOrmula1" range(D18).offset((lloop-1)*22).formular1c1="=FOrmula1" range("F20:F22,J20:J22").offset((lloop-1)*22).formular1c1="=FOrmula2" next lloop end sub