发布网友 发布时间:2022-04-22 04:40
共2个回答
热心网友 时间:2023-07-19 08:17
红线隔开的分别是不同的表格吧,这样的话可以用插入透视表的方法:
1.插入数据透视表,把要分表的字段放到筛选的下面
2.点透视区域任一单元格,【分析】-【选项】-【显示报表筛选页】
之后会弹出一个“显示报表筛选页”的框,直接点确定即可
效果如下:
热心网友 时间:2023-07-19 08:17
同时按alt和f11进入宏界面,点菜单的插入,模块,粘贴如下代码:
sub
test()
dim
i
as
integer
i
=
inputbox("请输入表格的行数,会自动生成一方表格",
"hi")
cells.clearformats
range(cells(1,
1),
cells(i,
i)).select
selection.borders(xledgeleft).linestyle
=
xlcontinuous
selection.borders(xledgetop).linestyle
=
xlcontinuous
selection.borders(xledgebottom).linestyle
=
xlcontinuous
selection.borders(xledgeright).linestyle
=
xlcontinuous
selection.borders(xlinsidevertical).linestyle
=
xlcontinuous
selection.borders(xlinsidehorizontal).linestyle
=
xlcontinuous
end
sub
回到excel,工具,宏,运行此宏,完成。