一键打印某日课表

廖月

要打印课表每天格式是一模一样的，每天用A4纸打印三个年级课表，一个年级一张纸，三张表共同一个表头：即一二两行；每张表打印区域从A列N列，这个能办到吗？

廖月

看来一键打印，是个难题

shiruiqiang

录了个宏，因打印的行数量不同，只能手工调整。
个人电脑模拟打印成pdf，没问题。
其余的如打印哪一天，代码根据原来的，自己手动改一下吧。

蓝桥玄霜

先执行单元格代码，只需要执行一次。
然后执行打印代码。

廖月

蓝桥玄霜 发表于 2024-11-17 18:19
先执行单元格代码，只需要执行一次。
然后执行打印代码。

老师，能提供代码，图片怎么处理呢

廖月

shiruiqiang 发表于 2024-11-17 18:16
录了个宏，因打印的行数量不同，只能手工调整。
个人电脑模拟打印成pdf，没问题。
其余的如打印哪一天， ...

谢谢老师帮忙，谢谢啦！

廖月

蓝桥玄霜 发表于 2024-11-17 18:19
先执行单元格代码，只需要执行一次。
然后执行打印代码。

老师，  ReDim Preserve Arr1(1 To r)总是调试，不知道是哪里错了

廖月

蓝桥玄霜 发表于 2024-11-17 18:19
先执行单元格代码，只需要执行一次。
然后执行打印代码。

蓝桥玄霜老师，能不能求您帮个忙吧代码调试一下，好像不能正常使用

蓝桥玄霜

请仔细核对抄写的代码，初学者常常会抄错的。
或者上传出错的代码和附件看看。

廖月

蓝桥玄霜 发表于 2024-11-17 18:19
先执行单元格代码，只需要执行一次。
然后执行打印代码。

好像把功能表也覆盖了，老师，我实在是搞不会，求您帮忙，谢谢。