求助：将自动排产表函数改成VBA程序

荒烟平楚

     有个很实用的函数做的自动排产表，但是因为经常要变更计划，这个表经常要插入行等操作就会出问题，而且表格数据量很大，用函数不太适合，急需将它改成VBA实现自动排产，做成通用模式推广，原理计算公式和函数一样。小弟不知道用VBA的算法，如果把它优化了会帮助很多人，求高手帮忙解决，大家可以一起讨论。            
    详见附件！
     就是这个函数：=IF(OR($A27=0,$E27=0,S=0,$N27>AI$7,$K27=SUM($R27:AH27)),,IF(L=1,MIN($K27-SUM($R27:AH27),$M27,$J27*SS),IF(SUM(AI26:INDIRECT(T&(M+ROW($A$9)))/$J26:INDIRECT("J"&(M+ROW($A$9))))*1/SS>=1,,MIN((1-SUM(AI26:INDIRECT(T&(M+ROW($A$9)))/$J26:INDIRECT("J"&(M+ROW($A$9))))*1/SS)*$J27*SS,$K27-SUM($R27:AH27),$M27,$J27*SS))))