2018年12月20日
vba文件对比并高亮显示
摘要： 每月月底要和人事要离职人员名单，并账号列表里删除已经离职人员的账号，如下代码通过将账号列表与人事发来的离职清单进行对比，高亮找出离职人员的账号，并进行删除。 阅读全文
posted @ 2018-12-20 16:22 tec2019 阅读(555) 评论(0) 推荐(0)
vba统计电脑计算机名和登陆的用户名
摘要： Public Sub GetIPT() gipt = Trim(InputBox("请输入所在组，只需输入前面的字母代码即可 A- groupA B-groupB C-groupC D-groupD E-groupD ")) strIPT = UCase(gipt) If strIPT = "A" Then GetInfo ("AirBus"): End If s... 阅读全文
posted @ 2018-12-20 15:55 tec2019 阅读(398) 评论(0) 推荐(0)
VBA汇总同目录下的所有工作簿数据到另一个工作簿，并进行统计
摘要： Sub clData() Dim ComputerCount As Object tms = Timer p = ThisWorkbook.Path & "\" f = Dir(p & "*.xls") Application.ScreenUpdating = False tms = Timer On Error Resume Next ... 阅读全文
posted @ 2018-12-20 15:28 tec2019 阅读(2007) 评论(0) 推荐(0)