体验零代码搭建

excel横向打印的自动排版

网友投稿  ·  2023-10-31 20:10  ·  行业资讯  ·  阅读 491


利用excel自带的vba编程,实现对表格的自动排版,本文来说说横向打印的排版。  步骤  案例:要给的表格排版。  注意,一共有三张表格,分别是语文、数学、英语学科成绩统计表。  在语文表格里启动vba。  在vba界面插入模块。  在模块1里编写程序。给程序命名为排版,调用工作表函数counta统计行数和列数。  A4纸的宽为21cm,统一设置行高时,就在21里面减去2个3,给一张A4纸上下各留3cm,把余下的部分按总行数平均分。  A4纸的长为29.7cm,统一设置列宽时,就在29.7里面减去2个1.9,给一张A4纸左右各留1.9cm,把余下的部分按总列数平均分。  设置横向打印。  编写程序完,关闭vba界面,在语文表格里启动宏。  执行宏--“排版”。  语文表横向打印自动排版的效果。  可以“打印预览”,看看效  预览的效果。  同样,在数学表格里启动宏。  执行宏--“排版”,完成后,也可以“打印预览”,看看预览的效果。  同样的操作,可以完成英语表格的自动排版,看看打印预览的效果。  以上就是excel横向打印的自动排版方法介绍,操作很简单的,大家学会了吗?希望这篇文章能对大家有所帮助!

利用excel自带的vba编程,实现对表格的自动排版,本文来说说横向打印的排版。  步骤  案例:要给的表格排版。  注意,一共有三张表格,分别是语文、数学、英语学科成绩统计表。  在语文表格里启动vba。  在vba界面插入模块。  在模块1里编写程序。给程序命名为排版,调用工作表函数counta统计行数和列数。  A4纸的宽为21cm,统一设置行高时,就在21里面减去2个3,给一张A4纸上下各留3cm,把余下的部分按总行数平均分。  A4纸的长为29.7cm,统一设置列宽时,就在29.7里面减去2个1.9,给一张A4纸左右各留1.9cm,把余下的部分按总列数平均分。  设置横向打印。  编写程序完,关闭vba界面,在语文表格里启动宏。  执行宏--“排版”。  语文表横向打印自动排版的效果。  可以“打印预览”,看看效  预览的效果。  同样,在数学表格里启动宏。  执行宏--“排版”,完成后,也可以“打印预览”,看看预览的效果。  同样的操作,可以完成英语表格的自动排版,看看打印预览的效果。  以上就是excel横向打印的自动排版方法介绍,操作很简单的,大家学会了吗?希望这篇文章能对大家有所帮助!

excel横向打印的自动排版


如何在Excel中快速查找或返回第二个最大值或最小值? << 上一篇
2023-10-31 20:10
如何在Excel列中快速查找部分重复项?
2023-10-31 20:10
下一篇 >>

相关推荐