Foxtable(狐表)用户栏目专家坐堂 → 如何筛选比对两个月的数据的变化情况


  共有7037人关注过本帖树形打印复制链接

主题:如何筛选比对两个月的数据的变化情况

帅哥哟,离线,有人找我吗?
zhangchi96
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
如何筛选比对两个月的数据的变化情况  发帖心情 Post By:2014/1/7 23:02:00 [显示全部帖子]

有个表,名称“比对表”,表里显示职工两个月的资料信息

<!--StartFragment -->
 
年月 序号 姓名 职务 职称 学科 工资 奖金 合计 考核 电话
201401 1 张三 主任 一级教师 语文 2600 1800 4400 95 12345678901
201401 2 李四 副主任 一级教师 数学 2500 1700 3200 98 12345678902
201401 3 赵武 教师 二级教师 数学 2800 1000 3800 99 12345678903
201401 4 王六 教师 二级教师 外语 1500 2000 3500 90 12345678904
201402 1 张三 主任 一级教师 语文 2600 1600 4400 95 12345678901
201402 2 王六 教师 二级教师 外语 1500 2000 3500 90 12345678904
201402 3 李四 主任 高级教师 数学 2500 1700 3200 98 12345678902
201402 4 陈七 教师 一级教师 地理 1500 2000 3500 90 12345678905
201402 5 顾九 教师 二级教师 历史 1500 2000 3500 90 12345678907
 
经过处理的结果为
 
 
年月 序号 姓名 职务 职称 学科 工资 奖金 合计 考核 电话
本月新增 4 陈七 教师 一级教师 地理 1500 2000 3500 90 12345678905
本月新增 5 顾九 教师 二级教师 历史 1500 2000 3500 90 12345678907
201401 2 李四 副主任 一级教师 数学 2500 1700 3200 98 12345678902
201402 3 李四 主任 高级教师 数学 2500 1700 3200 98 12345678902
201401 1 张三 主任 一级教师 语文 2600 1800 4400 95 12345678901
201402 1 张三 主任 一级教师 语文 2600 1600 4400 95 12345678901
本月减少 3 赵武 教师 二级教师 数学 2800 1000 3800 99 12345678903
 
处理要求:
查找在201401、201402两个月份中某个人的信息是否发生变化(对“序号”“考核”“电话”列发生变化的忽略不计)
1、如果没有变化,则删除此人的两个月的信息,
2、如果有变化,则把此人的两个月信息连续显示,并把有变化的项目内容显示为红色,
3、对在201401出现,在201402未出现的,在“年月”列显示为“本月减少”
4、对在201401没有,在201402出现的。在“年月”列显示为“本月增加”
 
求代码,恳求高手指点。
 
 
[此贴子已经被作者于2014-1-7 23:09:19编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
zhangchi96
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
  发帖心情 Post By:2014/1/8 22:23:00 [显示全部帖子]

想在窗体中执行后的结果样式放在电子表格里,请多指教!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:职工信息比对问题.rar


 回到顶部
帅哥哟,离线,有人找我吗?
zhangchi96
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
  发帖心情 Post By:2014/1/9 22:07:00 [显示全部帖子]

      太震惊了,我也只是想想,没想到真能写出这样的代码,能认真看懂了也需要好几天,还真不容易,感谢专家“有点甜”的辛勤劳作,佩服“有点甜”的睿智。

      代码确实看上去太难了,以致于想看懂了改改都没法了,所以只要再麻烦专家“有点甜”了

 

      请修改:

      原先要求里提到的,对于“考核”列的变化是要忽略的,姓名“王六”的信息除了“考核”列变化外其余没有变化,因此王六的信息视为没有变动,既然“王六”的信息没有变动,则有关“王六”的两个月的信息都需要删除,能帮我修改一下吗?


 回到顶部
帅哥哟,离线,有人找我吗?
zhangchi96
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
  发帖心情 Post By:2014/1/12 11:06:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:职工信息.table

发现两个小问题,已上传了新的附件:

1、列名称为两行时,原来的列名“职务”,改为“职务_评定”,这时得到的结果有变化:所有颜色向上偏移了一行(原来第一行是红色的,现在“职务_评定”的“评定”两字变红色了),改了好几次参数,都因为代码的逻辑复杂,没有成功.

2、当201401和201402的数据全部相同时,有出错信息,我想是不是在

    r1 = t.Rows(t.Rows.Count-2)   这句话前面加上 if t.Rows.Count>1 then    .....end if 这样的判断

 

请指教!

[此贴子已经被作者于2014-1-12 12:09:32编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
zhangchi96
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
  发帖心情 Post By:2014/1/12 22:55:00 [显示全部帖子]

特别感谢“有点甜”“y2287958","y287958"可能没考虑本月增加和减少的,对信息无变化的未删除,

用“有点甜”的代码,又发现了新的问题(绿色部分),烦请指导:

图片点击可在新窗口打开查看
问题小结:
1、(1)只要排在最后的两行,不一样的部分两行都是绿色;
     (2)、第2行 第3行有不同的部分,原计划是想在第3行显示绿色的,现在却是第2行显绿色, 
  目的概述:第2行和第3行不同,第6行和第7行不同,最好把第2、6行设成淡绿色,第3、7行设成绿色
2、经过比对后如果行数剩下1行 或0行时,代码运行出错
  目的概述:能不能添加判断一下行数范围
 
再次感谢“有点甜”的 精心设计和修改

图片点击可在新窗口打开查看此主题相关图片如下:qq图片.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2014-1-12 22:57:37编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
zhangchi96
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
  发帖心情 Post By:2014/1/13 23:50:00 [显示全部帖子]

     特别感谢,最后的代码运行结果很好,感谢“有点甜”花了好多精力和时间,过程中遇到的一点小问题都很耐心地帮我修改,真实德才兼备。


 回到顶部
帅哥哟,离线,有人找我吗?
zhangchi96
  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
  发帖心情 Post By:2014/1/15 14:24:00 [显示全部帖子]

谢谢14楼的指点。


 回到顶部