主题：[求助]如何将列标题变到行记录里面

ClearGrid(Grid) And eval("AppendFor(""排程表"",""产品编号,产品名称,规格," +  Substitute( Substitute(Substitute(eval(""""+Substitute(Substitute(eval("Mid(Rept(""@"+Substitute(eval("Split("""+ListCols("排程表")+""",""本次计划量|"",2)"),"|",""",2),1)+""|""+Mid(Rept(""@")+""",2),1)"),"@","@""+Mid(Rept(""#"),"|",""",2),1)+""|""+""")+""",2),1)"),"@",""",""产品编号,产品名称,规格,计划数量"","""),"#",""","">"",0)And ReplaceFor(Grid,""日期"","""),"|",""",""日期"",""="","""")and AppendFor(""排程表"",""产品编号,产品名称,规格,") + """,""日期"",""="","""")") And DelRow(Grid,1)