2013-04-09
展开全部
假如数据在Sheet1表里从A1开始的,没有行标题。
你可在另一张表A1里输入公式:
=IF(MOD(ROW(),3),OFFSET(Sheet1!A$1,ROW()-INT(ROW()/3)-1,0),"")
然后向右,向下拉即可实现。
如果情况有变可对公式里参数相应修改。
你可在另一张表A1里输入公式:
=IF(MOD(ROW(),3),OFFSET(Sheet1!A$1,ROW()-INT(ROW()/3)-1,0),"")
然后向右,向下拉即可实现。
如果情况有变可对公式里参数相应修改。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-04-08 · 知道合伙人软件行家
关注
展开全部
执行下面这段宏可以解决你的问题
sub test
dim Endr as long, i as long
Endr=activesheet.range("A65536").end(xlup).row
for i =Endr to 2 step -1
rows(i).insert
next
end sub
sub test
dim Endr as long, i as long
Endr=activesheet.range("A65536").end(xlup).row
for i =Endr to 2 step -1
rows(i).insert
next
end sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-04-09
展开全部
安装Adobe Acrobat后你就在打印时有一个虚拟打印机,只要不是经过特殊加密的专有格式文件,你可以将电脑中任意格式的文本转成PDF文件,另外加装FINEPRINT PDF FACTORY 这类很小的程序可以达到同样目的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询