Excel批量处理考勤记录表转三列表方法
修法布施得聪明智慧,多分享让生活更美好。上次我们介绍了如何快速批量删除考勤记录表中的重复时间,在这篇文章中,我们将分享如何快速批量把考勤记录表转成三列表(日期、姓名以及打卡时间)的处理方法。
步骤1:准备工作
首先打开Microsoft Office Excel 2007,并另存为文件名《Excel怎样快速批量把考勤记录表转成三列表.xlsm》。接下来,按下快捷键ALT F11打开VBE(宏)编辑界面,在菜单栏【插入】下拉菜单中选择【模块(M)】。
步骤2:插入代码
在VBE编辑界面中插入一个新模块,在代码框中复制以下代码:
```vba
Sub 选考勤表转表()
Dim myr As Range, i As Long, j As Long, r As Long, c As Long, mb(), k As Long
Set myr Selection
r
c
ReDim mb(1 To c * (r - 1) / 2, 1 To 3)
For i 3 To r Step 2
For j 1 To c
k k 1
mb(k, 1) myr.Cells(1, j).Value
mb(k, 2) myr.Cells(i - 1, 1).Value
mb(k, 3) myr.Cells(i, j).Value
Next j
Next i
Worksheets("Sheet2").Range("A3").Resize(k, 3) mb
MsgBox "完成!"
End Sub
```
步骤3:运行宏
回到工作表窗口,选择考勤记录表单元格区域(从日期行至最后一个时间记录行)。然后运行【选考勤表转表】宏,方法是在菜单栏中选择【视图】,找到【宏】,在宏对话框中选中该宏名,然后执行。结果将会输出到Sheet2工作表中。
如果以上方法帮助到您,请不要吝啬您的支持!您可以点击“投票点赞”或者“收藏”以表示对我们的认可。如果您还有任何疑问,请点击“我有疑问”,我们将竭诚为您解答。感谢您的阅读与支持!
版权声明:本文内容由互联网用户自发贡献,本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。