早教吧 育儿知识 作业答案 考试题库 百科 知识分享

如何用VBA完成打印时当每页的第23-29行中任一行的B列出现合计时,在其后面添加分页符。

题目详情
如何用VBA完成 打印时
当每页的第23-29行中任一行的B列出现 合计时,在其后面添加分页符。
▼优质解答
答案和解析

你描述的问题不尽祥细,只能给你个大概的思路。

  1. 在你进行合计的行最好在A列写上 ”合计:“  

  2. 历遍每个工作表。

  3. 在工作表中,以从上到下方式进行寻找 ”合计:“字符,找到后记录行号做为分割行以方面做第一页结束行/第二页的首行(如:寻找到23A列 行有”合计:” 字符,那么记录值为23)###设定一个寻找区域从第一页结束行开始到最后一行再次行寻找,直到没找到为止。打印成后转第二个工作表,直到所有工作表完成#####

  4. 设置打印区域ActiveSheet.PageSetup.PrintArea = "A1:L23" ,把区域设个值,做成动态的。


总的理念就是,在A列  以寻找 ”合计:“  字符  定位,进行分页,设置打印区域

看了 如何用VBA完成打印时当每页...的网友还看了以下: