首页  >  Excel

excel横向打印的自动排版

Excel 2019-07-21 00:11:45 143

利用excel自带的vba编程,实现对表格的自动排版,本文来说说横向打印的排版。

步骤

案例:要给如图的表格排版。

注意,一共有三张表格,分别是语文、数学、英语学科成绩统计表。

excel自动排版之横向打印

在语文表格里启动vba。

excel自动排版之横向打印

在vba界面插入模块。

excel自动排版之横向打印

在模块1里编写程序。给程序命名为排版,调用工作表函数counta统计行数和列数。

excel自动排版之横向打印

A4纸的宽为21cm,统一设置行高时,就在21里面减去2个3,给一张A4纸上下各留3cm,把余下的部分按总行数平均分。

excel自动排版之横向打印

A4纸的长为29.7cm,统一设置列宽时,就在29.7里面减去2个1.9,给一张A4纸左右各留1.9cm,把余下的部分按总列数平均分。

excel自动排版之横向打印

设置横向打印。

excel自动排版之横向打印

编写程序完,关闭vba界面,在语文表格里启动宏。

excel自动排版之横向打印

执行宏--“排版”。

excel自动排版之横向打印

语文表横向打印自动排版的效果。

excel自动排版之横向打印

可以“打印预览”,看看效果。

excel自动排版之横向打印

预览的效果。

excel自动排版之横向打印

同样,在数学表格里启动宏。

excel自动排版之横向打印

执行宏--“排版”,完成后,也可以“打印预览”,看看预览的效果。

excel自动排版之横向打印

同样的操作,可以完成英语表格的自动排版,看看打印预览的效果。

excel自动排版之横向打印

excel如何横向打印 excel表格横向打印 excel横向打印怎么设置 excel怎么打印 excel打印 excel表格怎样横着打印 excel表格打印不
版权声明

本文来自投稿,不代表本站立场,转载请注明出处。

分享:

扫一扫在手机阅读、分享本文