2016 - 2024

感恩一路有你

Excel批量处理考勤记录表转三列表方法

浏览量:2457 时间:2024-05-28 12:58:51 作者:采采

修法布施得聪明智慧,多分享让生活更美好。上次我们介绍了如何快速批量删除考勤记录表中的重复时间,在这篇文章中,我们将分享如何快速批量把考勤记录表转成三列表(日期、姓名以及打卡时间)的处理方法。

步骤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工作表中。

如果以上方法帮助到您,请不要吝啬您的支持!您可以点击“投票点赞”或者“收藏”以表示对我们的认可。如果您还有任何疑问,请点击“我有疑问”,我们将竭诚为您解答。感谢您的阅读与支持!

版权声明:本文内容由互联网用户自发贡献,本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。