如何打印多行表头工资条

xwklm

学习了，谢谢。

bb840524

朱荣兴 发表于 2018-8-21 17:39
老兄啊，你知道什么是 工作表，什么是工作簿吗？？？？？

感谢指导，已经好用，辛苦谢谢！

alongvip

直接引用sheet1的数据

犬神_狼

朱荣兴 发表于 2018-8-21 15:49
新建一个工作表，命名为  工资条    然后把你设计好的工资条表头拷贝到  新建工作表的a1
运行代码
Sub 工 ...

这个方法如果里面存在公式，有可能会报错，譬如题主的最后一列数据，由于引用了N列的值，就报错了。。。
请问该怎么处理？
譬如，1. 只复制值？那该怎么操作？
          2.调整公式里的引用内容？好像更难吧？

犬神_狼

朱荣兴 发表于 2018-8-22 11:58
Sheets("工资条").Cells(m, 1).Resize(1, 14) = Sheet1.Range("a" & i).Resize(1, 14).Value
Sheets(" ...

谢谢谢谢。。。
这样的话数字这行的边框就得手动调整或者添加命令设置了，是吧？

犬神_狼

朱荣兴 发表于 2018-8-22 11:58
Sheets("工资条").Cells(m, 1).Resize(1, 14) = Sheet1.Range("a" & i).Resize(1, 14).Value
Sheets(" ...

哈哈哈哈。。。。
找到一个比较贱的方法，先用原先的copy命令，这样就把原先的格式全带进来了，然后再用这里的“=” 方法，单独把数值更新一遍。。。

完美。。。
哈哈哈哈。。。