欢迎您访问南京安优网络官方网站,本公司专注于:网站制作、小程序开发、网站推广。 24小时服务热线:400-8793-956
当前位置:金7乐走势 > 资讯中心 > 安优观点
Sorry,你的问题我只能想到一个完美解决方案
来源:金7乐走势 时间:2018-01-19 08:27:45

金7乐走势 www.m3qw.cn          最近有位小伙伴私聊我一个问题,我考虑了许久也没能想到第二个完美解决方案,问题是这样的,该小伙伴丢给我一个Excel文件,文件有两份工作表,我稍作简化处理了一下。

        第一张工作表截图如下:

        第二张工作表截图如下:

        仔细看上面两张截图,可以发现第一张工作表中的节点信息就是由多个申告号码组成。刚收到这样的表格,我以为申告号码只会出现在一个节点信息中。所以我就想到使用Vlookup的部分匹配来获取运维严障单号,我使用的公式为=IFERROR(VLOOKUP("*"&A2&"*",IF({1,0},Sheet3!$B1:$B$1500,Sheet3!$A1:$A$1500),2,0),""),该公式就不在介绍了,前期发表的多个图文教程都有介绍类似逆向查找的说明。
        就这样,我把公式发给了私聊我的小伙伴,万万没想到的是,上面的公式是有问题的。等我发现该错误的时候,是在使用VBA完美解决申告号码会出现在多个节点信息列中。VBA代码如下:
 
Sub sutTest()
    Dim i, iRow As Integer
    Dim strNum As String
    Dim sutArray
    '关闭屏幕刷新
    Application.ScreenUpdating = False
    '获取运维号和节点信息
    Worksheets("Sheet3").Select
    sutArray = Range([A2], [B2].End(xlDown))
    '循环处理申告号码
    Worksheets("Sheet4").Select
    Range([B2], [B65535]).ClearContents
    Range("A2").Select
    iRow = 1
    strNum = ""
    '循环模糊比对,能匹配到则放入运维严障单号列中
    Do While ActiveCell.Value <> ""
        For i = 1 To UBound(sutArray)
            If sutArray(i, 2) Like "*" & ActiveCell.Value & "*" Then
                strNum = strNum & sutArray(i, 1) & ","
            End If
        Next
        If strNum <> "" Then
            strNum = Left(strNum, Len(strNum) - 1)
        End If
        ActiveCell.Offset(0, 1).Value = strNum
        strNum = ""
        ActiveCell.Offset(1, 0).Select
    Loop
    Application.ScreenUpdating = True
End Sub
 
        上面的代码都加以注释了,也非常容易理解,就不在详细解释了。第二张工作表的申告号码共有一万六千多条,我刚开始使用函数来解决该问题的时候,Excel还有点卡顿。
        其实第二张工作表截图中的运维严障单号列就是通过VBA代码匹配并填写的,小伙伴可以亲自试试。接下来继续讲解上面介绍的问题,我在第二张工作表D列输入上面的公式,并下拉到一万多行,得出的结果如下图所示:

        不知道各位小伙伴通过上图能否看到问题的所在?就拿申告号码ADSLD2300660153为例,使用VBA能匹配得到YZ-ZH-20180110-00001,但使用Vlookup部分匹配却什么都没找到,正常来说,是不会出现这种问题的,Vlookup不能返回多个结果,但只要有符合条件的值,一定会返回的。那出现该问题的原因是什么呢?为了找到该问题,我尝试分解公式,从最简单的公式开始,把公式中的Sheet3!$B1:$B$15提取出来,放到空白单元格,按下F9,详细操作请见如下动态图:

        可以看到第一张工作表的B2单元格的值显示为了#VALUE!,到这里我就明白,为啥我给出去的公式是错误的了。为了搞明白该问题,我特地把第一张工作表的B2和B3单元格的值复制到新的工作表中,然后使用Len函数查看单元格值的长度,具体操作如下动态图所示:

        最终终于确定了,当单元格长度超过255后,在函数中都会返回#VALUE!, 为了确定是否是微软的Bug,我还特地把制作好的工作簿拷贝到安装了WPS 2016专业版的电脑上,尝试打开查看,结果惊呆了,详细如下如所示:

        发现WPS没有该问题,Vlookup函数可以正确显示结果,头一次发现了WPS软件的强大之处,国产软件V587(威武霸气)。至于微软Office为什么显示错误,不要问我,因为我也不知道,有哪位小伙伴知道,请一定记得告诉我哦。
        
        好了,今天的介绍就到这了,大家如果在学习的VBA等过程中遇到任何问题,欢迎留言

本文地址://www.m3qw.cn/news/1444.html
Tag: 完美 解决 方案
专业服务:金7乐走势,金7乐走势,金7乐走势
联系电话:025-65016872
上一篇: 暴利赚钱莫过风水,塔罗牌占卜也还不错
下一篇: 多关键字排序,多少个排序条件都可以一起来
最新案例
泰杰赛
泰杰赛
苏派教育
苏派教育
全国大学生公共卫生大赛
全国大学生公共卫生大赛
南京德普筒仓建安工程有限公司
南京德普筒仓建安工程有限公司
中国非金属材料南京矿山工程有限公司
中国非金属材料南京矿山工程有限公司
你可能感兴趣
网站设计的平均寿命是多少?
拥有SSL安全网站的5个好处
如何准备网站设计咨询
如何创建网站站点地图
自定义网页设计或网站模板?
如何降低您的网站跳出率
什么是UX设计?我们的UX设计流程
5个为您的网站项目定价的隐藏成本
最后更新
5个WordPress的用户参与度量标准 如何计算您的商家的Google广告费用 更新网站设计时保持SEO排名的提示 你的新网站需要的八件事 三个C为更好的商业写作 邪恶的好语法:营销必须 为什么您的企业需要博客......现在 ABC:永远在转换
服务项目
金7乐走势 营销型网站 微信营销 IDC网站 精品案例
  • 四兄弟合伙创业 种植羊肚菌成功 2019-04-19
  • 对话川美前院长罗中立:揭秘《父亲》创作历程 2019-04-19
  • 女婴遗弃在草丛里 热心市民与民警接力救助 2019-04-14
  • 【株洲天气】最新株洲今天天气,实时提供株洲气温、空气质量、24小时天气预报、生活指数查询 2019-04-14
  • 移植2胚怀5胎 一针减3化风险 十堰市人民医院再创生命奇迹 2019-04-13
  • 一带一路常州故事——中国常州网专题 2019-04-13
  • 全国首列“研学旅行专列”兰州启程 2019-03-31
  • “2017最具影响力马拉松赛事排行榜”Top100发布设置全民性特殊奖励成趋势 2019-03-27
  • 李肇星:与《人民日报》的不解之缘 2019-03-22
  • “音乐教父”罗大佑现身《朗读者》自曝曾因创作压力离台赴港 2019-03-22
  • 脱下警服当支书 老高回村以后(新时代·面孔) 2019-03-18
  • 地方领导留言板 2019-01-31
  • 专访火球买手创始人王博:年轻人更懂年轻人,服务个性化消费丨《New Face》第47期 2019-01-31
  • 雅丹旅行地中国国家地理网 2018-12-12
  • 5月一二三线城市房价环比都涨了 后续会咋样? ——凤凰网房产济南 2018-12-12
  • 817| 112| 196| 153| 318| 309| 725| 353| 511| 755|