假设原表格为sheet1,你可以在另外一个表格的A2中写入公式:
=OFFSET(Sheet1!$A$2,,COLUMN(A1)-1+(ROW(A1)-1)*10)
右拉复制公式到J2单元格,然后选中第二行的10个单元格,下拉复制公式即可。
见图:
=OFFSET(Sheet1!$A$2,,COLUMN(A1)-1+(ROW(A1)-1)*10)
好方法 顶个先
看了楼主的条件 改了下前人的公式 :
=OFFSET($A$1,MOD(ROW(),2),COLUMN(A1)-1+INT(ROW(A1)/2-0.5)*10)
不知是不是这个意思?
可在sheet2中写公式:
A1=IF(MOD(ROW(),2),IF(MOD(COLUMN(),2),"名称","价格"),OFFSET(Sheet1!$A$2,(ROW()/2-1)/7,MOD((ROW()/2-1)*10,70)+MOD(COLUMN()-1,10),))
向右复制到j列,再向下复制,可把每行转换成10*7的数据,完后复制选择性粘贴数据,选数值,去掉公式,再做排版.
把excel文件作为数据源,在word中制作一个10*7的表格的邮件合并模板,在word中合并,就可以每行一页了。
可以看一下我以前的一个回答:http://zhidao.baidu.com/question/91055012.html
可以把每行复制到word,调整分栏数,字体,页边距到一页!希望对你有帮助!