excel员工名单自动生成离职表vba代码

Excel员工名单自动生成离职表，需要用到VBA代码。具体步骤如下：

1. 在Excel中创建新的工作表，输入需要的员工名单，包括姓名、职位、入职时间等。

2. 在工作表中，新建一列“是否离职”，默认值为“否”。

3. 编写VBA代码，实现将离职员工自动移动到离职表中的功能。

4. 编写代码实现一个按钮，当点击该按钮时，自动根据“是否离职”列的数值，将离职员工信息移动到另一张工作表中。

5. 在离职表中，可以根据需要添加其他信息，如离职原因、离职日期等。

具体VBA代码如下：

Sub Move_To_Leaving()

Dim Fname As String
Dim Sname As String
Dim row As Long
Dim Download As Long
Dim PageIndex As Integer

Fname = "原数据表"
Sname = "离职表"

row = Sheets(Fname).UsedRange.Rows.Count

Download = 2
PageIndex = 1

For i = 2 To row

If Sheets(Fname).Cells(i, "C").Value = "是" Then '判断是否离职
Sheets(Fname).Range("A" & i & ":I" & i).Copy Destination:=Sheets(Sname).Range("A" & Download & ":I" & Download)
Download = Download + 1
Sheets(Fname).Range("A" & i & ":I" & i).Delete shift:=xlShiftUp
i = i - 1
End If

Next

End Sub

此代码实现了将员工名单中设定为“是”的员工信息自动移动到离职表中的功能。其中，Fname和Sname需要根据实际情况进行修改。此外，还可以根据需要添加其他功能。

综上所述，以上就是Excel员工名单自动生成离职表VBA代码的具体步骤和代码实现。