在请教以问题:原正确公式为: If([%年份%]="",MsgBox("请选择年份!",0),if(text([%月份%])="",MsgBox("请选择月份!" ,0),if([%品牌%]="",MsgBox("请选择品牌!",0),Eval("CreateGrid(""临时表"",""指标"",0,""品牌"",0,""分公司"",0,"""+[%年份%]+"年"+Substitute(Substitute(if(Number([%月份%])=10,Left("1|2|3|4|5|6|7|8|9|10|11|12",Number([%月份%])*2),if(Number([%月份%])=11,Left("1|2|3|4|5|6|7|8|9|10|11|12",Number([%月份%])*2+1),if(Number([%月份%])=12,Left("1|2|3|4|5|6|7|8|9|10|11|12",Number([%月份%])*2+2),Left("1|2|3|4|5|6|7|8|9|10|11|12",Number([%月份%])*2-1)))),"|","|"+[%年份%]+"年"),"|","月"",1,""")+"月"",1)") and OpenGrid("临时表") and ClearGrid(Grid) And AppendFor("指标列表","指标","指标") and DelFor(grid,"指标","=","") and EvalFor(Grid,"分公司","[%分公司%]") And EvalFor(Grid,"品牌","[%品牌%]") and SetVariable("%A%",3) And Eval(Mid(Rept(" And SetVariable(""%A%"",[%A%]+1) And SetColformula(""临时表"",[%A%],""FindText(""""text([年份])+源数据"""",[指标],""""年份"""",""""="""",[%年份%],""""品牌"""",""""="""",[%品牌%],""""月份"""",""""="""",Col-3,""""分公司"""",""""="""",[分公司])"")",Number([%月份%])),5)) and RecalcGrid("临时表",1) and OpenGrid("按公司3") and ClearGrid(Grid) and renamecol(4,[%年份%]+"年1月")and renamecol(5,[%年份%]+"年2月")and renamecol(6,[%年份%]+"年3月") and renamecol(7,[%年份%]+"年4月") and renamecol(8,[%年份%]+"年5月") and renamecol(9,[%年份%]+"年6月") and renamecol(10,[%年份%]+"年7月") and renamecol(11,[%年份%]+"年8月")and renamecol(12,[%年份%]+"年9月")and renamecol(13,[%年份%]+"年10月") and renamecol(14,[%年份%]+"年11月")and renamecol(15,[%年份%]+"年12月") and AppendRows("临时表") and DelFor("按公司3","指标","=","") And SetRowHeight(25)))) 我想修改其中:FindText(""""源数据"""",[指标],""""年份"""",""""="""",[%年份%],""""品牌"""",""""="""",[%品牌%],""""月份"""",""""="""",Col-3,""""分公司"""",""""="""",[分公司])"") 想用text([年份])+"源数据"替换"源数据"试了多次不行,请教!!
|