蓝桥收藏之考勤数据分析计算实例

骑马上树

蓝老师能加我个好友吗？级别不够，加不了您啊

cxx5710

谢谢，感谢分享

教父01

老师您好，想请您帮我解决一下自动排序的问题，就是随着数据改变而数据列自动排序调整！！！本人尝试了很多办法，总是不得要领，表内数据变化后，所在列根据排序自动调整位置，始终按照排名1.2.3.....顺序排列！！！现在就是自动调整无法实现，还请各位大侠多多帮助！！！
http://club.excelhome.net/thread-1365815-1-1.html

055678

求教老师， 使用VBA将表格中的数据sheet2的行数据比对sheet1中数据，输出不在sheet1中的数据到... http://club.excelhome.net/thread-1369447-1-1.html (出处: ExcelHome技术论坛) 我自己写的代码不知道哪里有问题，请教！ Sub test()      Dim arr, arr1, drow, d As Object, i%, j%, k%      arr = Sheet1.[a1].CurrentRegion    arr1 = Sheet2.[a1].CurrentRegion         Set d = CreateObject("scripting.dictionary")  For k = 2 To UBound(arr)          d(arr(k, 1)) = "" Next         For i = 2 To UBound(arr1, 1)             For j = 2 To UBound(arr1, 2)                 If d.exists(arr1(i, j)) Then                     d.Remove (arr1(i, j))                     Else              d(arr1(i, j)) = ""               'Exit For                                End If             Next         Next         drow = Sheet2.[a65536].End(xlUp).Row          Sheet3.Range("B2").Resize(drow-1, d.Count) = d.keys End Sub

skiss

蓝老师这种擅于总结归纳的方式非常值得学习，能成为大神是有道理的。赞。

教父01

老师您好，您能帮我解决一下自动筛选排序的难题吗？ 我一直尝试着做，但是基础太浅，纯粹小白一个，还望老师多多帮助！！！主要是右侧那八个排名问题！红色说明部分！谢谢！http://club.excelhome.net/thread-1372932-1-1.html

泓贺

求助个问题 下行越界是怎么情况

chenhu1981

MARK 以后慢慢看

417744370

非常感谢蓝大师的分享

puCage

蓝老师，可以分享一下VBA实战精粹的 示例文档吗？ 邮箱地址：ppscauxiaohai@163.com。感恩感恩.