快要下班了，工资表秒变工资条
使用 VB 代码制作工资条
1）、打开工资表，选择开发工具选项——录制宏，然后停止录制
2）、粘贴 VB 代码
（Selection.CurrentRegion.Offset(2, 0).Select
Cells(Selection.Row, Selection.Column).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
ActiveCell.Offset(2#).Range("A1").Select
Do Until ActiveCell = ""
Selection.Insert shift:=xlDown
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
ActiveCell.Offset(2, 0).Range("A1").Select
Loop
Application.CutCopyMode = False）
粘贴时注意空格，否则会出错
3）、选中工资表，点击宏，运行即可。
关注我学习更办公使用小技巧。
今天的分享就是这些了，关注我不走丢，更多精彩内容绝不让你失望！
网友评论