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

数据量大不大？如果不是太大还有笨办法，不然的话咱可没辙。

试试指令表自定义按钮公式：

ClearGrid(Grid) And Eval(Mid(Rept(" And AppendRows(""排程表"")",([排程表!Cols]-5)*[排程表!Rows]),5)) And DelRow(Grid,1) and EvalFor(Grid,"日期","if(row<=rows/([排程表!Cols]-5),1,Number(Cell(Row-rows/([排程表!Cols]-5),""日期""))+1)") And EvalFor(Grid,"日期","[日期]+""日""")And EvalFor(Grid,"计划数量","FindText(""排程表"",[日期],""产品编号"",""="",[产品编号])") And DelReptRows(Grid,"日期","产品编号","产品名称","规格","计划数量") And DelFor(Grid,"计划数量","=",0) And SortCol(Grid,"日期",1)