答案 0 :(得分:0)
sub fill_test()
strt_column=5
row=5
for i=1 to 4
a=sheet1.cells(i+4,3).value
for j=strt_column to strt_column+a
sheet1.cells(row,j).value=sheet1.cells(i+4,2).value
next j
strt_column=j+1
row=row+1
next i
end sub
尝试这个...我没有测试过代码,但我认为它会起作用.....如果有任何错误评论回来......我会尽力修复它们......
答案 1 :(得分:0)
好吧....在考虑如何表达问题之后,我终于有了一个主意。请参阅我使用的公式(抱歉,我无法发布图像但声誉低且#34;声誉和#34;)。它不是最优雅的方式,因为我仍然需要使用第1行和第2行到第4行的不同公式。所以请分享您的想法!谢谢@SivaprasathV!
对于字母A:IF(E $ 4< = $ C5,$ B5,"") 对于字母B到D:IF(OR(E $ 4< = SUM($ C $ 5:$ C5),E $ 4> SUM($ C $ 5:$ C6)),"",$ B6)
答案 2 :(得分:0)