如何用控件设置打印区域

阳光暖洋洋 · 发表于 2022-12-27 13:14

1、希望在每张表格中建立一个打印控件，但是由于需要添加行，所以打印区域不会用代码固定，求赐教！
我写的是这样的，但是打印区域$A$2:$J$36就固定了，如果我在其中添加了行数或者列数就打印不出来了。
Private Sub CommandButton2_Click()
Worksheets("其他应收款").PageSetup.PrintArea = "$A$2:$J$36"
Worksheets("其他应收款").PrintOut
End Sub

ykcbf1100 · 发表于 2022-12-27 13:42

改成这样试试。

3190496160 · 发表于 2022-12-27 14:05

阳光暖洋洋 · 发表于 2022-12-27 14:05

ykcbf1100 发表于 2022-12-27 13:42
改成这样试试。

好像不行，按照老师您的代码，只打印出来了这一行

ykcbf1100 · 发表于 2022-12-27 14:07

阳光暖洋洋发表于 2022-12-27 14:05
好像不行，按照老师您的代码，只打印出来了这一行

我没有打印机，你试下3楼的代码吧。

阳光暖洋洋 · 发表于 2022-12-28 13:51

ykcbf1100 发表于 2022-12-27 14:07
我没有打印机，你试下3楼的代码吧。

不行额，还是只能打印出来一行“其他应收款清查评估明细表”，仅仅能打印这一行而已

ykcbf1100 · 发表于 2022-12-28 13:52

阳光暖洋洋发表于 2022-12-28 13:51
不行额，还是只能打印出来一行“其他应收款清查评估明细表”，仅仅能打印这一行而已

试试其它表。

3190496160 · 发表于 2022-12-28 14:41

你确定3楼我的代码也只能打印一行？？？？？？？？？？？？？？

阳光暖洋洋 · 发表于 2022-12-28 15:07

3190496160 发表于 2022-12-28 14:41
你确定3楼我的代码也只能打印一行？？？？？？？？？？？？？？

显示：无效外部过程

3190496160 · 发表于 2022-12-28 15:13

阳光暖洋洋发表于 2022-12-28 15:07
显示：无效外部过程

呵呵，兄弟啊，宏的名称，结束标志都没有，肯定是无效的过程了

		自动登录	找回密码
密码			免费注册

[求助] 如何用控件设置打印区域