[分享]工资条打印问题，自动为每位员工加上或去掉表头。

MOUS100 · 发表于 2003-1-4 11:24

只需按一下按钮哦 *_^

[upload=rar]uploadImages/20031411225147625.rar[/upload]

[em26][em27][em26]

顺祝大家新年愉快！

sunnet · 发表于 2003-1-4 12:02

很不错。简练精巧，可以满足许多有此要求的朋友们的需要。
可以给一个精华。

cxffxc · 发表于 2003-1-10 08:14

不错！非常好！我已下载，谢谢！

楚楚东人 · 发表于 2003-1-11 22:22

实用

geoLu · 发表于 2003-1-11 22:57

确实不错，但在打印时会将工资表中的两个命令按钮同时打印出来，最好在
Private Sub Workbook_BeforePrint(Cancel As Boolean)
......
End Sub
中间添加一个设置打印区域功能，将命令按钮设置在打印区域之外，这样命令按钮就不会随工资表一起打印了。如下句：
ActiveSheet.PageSetup.PrintArea = Range("A1").CurrentRegion.Address

MOUS100 · 发表于 2003-1-18 14:58

是的，也可以设定按钮控件的属性为固定大小、不随单元格移动且不打印即可。

jydd · 发表于 2003-1-18 20:26

插入表头后，能增加一空行就好了

jydd · 发表于 2003-1-21 17:01

插入空行最大的好处就是可以裁成条

MOUS100 · 发表于 2003-1-21 21:22

简单的办法:增加表头的行高就行了。

如果非要插入一行，自己稍微动动代码就行了。简单。

一辉 · 发表于 2003-2-11 00:06

不错

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

[原创] [分享]工资条打印问题，自动为每位员工加上或去掉表头。