Sub 导入考勤数据()
Dim 文件路径 As String
文件路径 = Application.GetOpenFilename(“Excel文件 (.xlsx), .xlsx”)
If 文件路径 <> “False” Then
Workbooks.Open 文件路径
‘ 数据导入逻辑
End If
End Sub
利唐i人事HR社区,发布者:HR数字化研究员,转转请注明出处:https://www.ihr360.com/hrnews/20241238847.html