金蝶核算项目余额表卡号余额与天财商龙CRM卡号余额对比

金蝶核算项目余额表卡号余额与天财尚龙CRM卡号余额对比

由于历史遗留问题,财务一直不调账,修改核算科目卡号与天财商龙CRM系统一直,只能用VBA把卡号前缀修改成两边一致。

再通过,Power BI Desktop进行比对,这个貌似比EXCEL的vlookup好用多了。

由于后期本人不再使用,SO不再进行升级优化,编写成全自动。

利用该方法,有效提高了对比速度,由原来的10多天人工对比,到现在的五六分钟,大大提高了工作效率。

虽然可以优化成一分钟之内实时更新对比数据,输出余额不一致卡号。但是本人不再进行使用,已经教会给同事,由同事使用,五分钟之内还是可以接受的。就不再花费时间和精力进行优化。

Attribute VB_Name = "模块1"
'金蝶卡号判断
Function pd(p As String) As String

If p Like "*1997*" Then
pd = Right(p, 16)
ElseIf ((Left((Right(p, 9)), 1)) Like "]") Then
pd = Right(p, 8)
Else
pd = Right(p, 6)
pd = "1997000000" + pd
End If
End Function

'天财卡号判断
Function tcpd(p As String) As String

If p Like "19971200*" Then
tcpd = "1997000000" + Right(p, 6)
ElseIf p Like "1997019900*" Then
tcpd = "1997000000" + Right(p, 6)
ElseIf p Like "199716*" Then
tcpd = "1997000000" + Right(p, 6)
Else
tcpd = p
End If

End Function

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

发表于

我来说两句

0 条评论
登录 后参与评论

相关文章

来自专栏用户画像

3.5.1介质访问控制

介质访问控制所要完成的主要任务是为使用介质的每个结点隔离来自同一信道上其他结点所传送的信号,以协调活动结点的传输。用来决定广播信道中信道分配的协议属于数据链路层...

803
来自专栏数据和云

数据库流行度6月排行榜:Oracle飙升MySQL止跌回升

六一儿童节,虽然是大家快乐的假期,但是也宣告了2018年进入中场。在DB-Engines的6月排行榜上,不同的数据库产品竞争也进入中场。先预祝大家中场收获满满!...

1124
来自专栏数据派THU

【数据蒋堂】列式存储的另一面

来源:数据蒋堂 作者:蒋步星 本文长度为2400字,建议阅读3分钟 本文针对只读的分析计算任务探讨列存的缺点。 列存是常见的数据存储技术,在许多场景下也确实很有...

1765
来自专栏jouypub

MySQL explain命令详解

explain显示了MySQL如何使用索引来处理SELECT语句以及连接表。在分析慢查询时,可以帮助选择更好的索引和写出更优的查询语句。

742
来自专栏SAP最佳业务实践

SAP最佳业务实践:FI–应收帐款(157)-2客户主数据

4 流程步骤 4.1 创建客户主记录 在此活动中,可以创建客户主记录。 要执行该活动,使用此凭证中的主数据,运行创建客户主数据 (155.18)业务情景中的...

2623
来自专栏飞总聊IT

Elastic Search飞起来,飞起来!

公众号上有人让我聊聊Elastic Search。其实前几天上市前也有人问了,我的留言是这样的:

663
来自专栏数据小魔方

用优雅的配色来缔造图表专业主义~

前天刚恢复状态的小魔方,今天又粗现啦~ 很多小伙伴儿问我为啥最近老是偷懒,其实是因为上周期中课程论文缠身(毕竟拖延症嘛总得拖到deadline否则绝不开工~_~...

2414
来自专栏AI研习社

2017,外媒眼中最热门数据库是哪个?

AI 研习社消息:近日,国外知名 IT 技术媒体 Jaxenter 进行了数据库观点调查,对开发者眼中数据库领域最热门的话题、最热门的数据存储以及处理工具进行统...

3548
来自专栏SAP梦心的SAP分享

公司消费一卡通“变法”记

一卡通在每家公司都存在,不仅含考勤机,还会有门禁,订餐,食堂消费等。我们公司采用的是厦门舒特科技的一卡通系统,前后用了好几年了。 在我之前,一卡通的功能主要启用...

1779
来自专栏一名合格java开发的自我修养

IT咨询顾问:group by与join引发的项目救火

我又一次进行了项目救火,这次的原因是group by与join胡乱的堆彻导致的整个业务系统审核流程发生严重的错误。基础的sql表关联,group by,子表都理...

592

扫码关注云+社区