- 博客(4)
- 资源 (2)
- 收藏
- 关注
原创 VBA快速合并字符串方法
在前几天分享的文章【快速对比数据】中,使用了如下代码,一下小朋友问为什么要再第20行代码中使用Trim函数呢?是否可以在构建字符串时将处理呢?本文将就讲一下VBA中快速连接字符串的集中方法。我们使用一个简单的示例,提取1-10中的偶数并输出结果,判断偶数非常简单,程序主框架如下。Sub Demo() Dim i As Integer, msg As String For i = 1 To 10 If Int(i / 2) = (i / 2) Then '构建字符串ms
2020-12-23 02:16:44 15736 2
原创 VBA解析JSON数据(6)-- JSON数据长度
JavaScript代码可以读取JSON数据KEY和VALUE,JSON数据可以多层嵌套,如何获取JSON数据长度呢?示例JSON数据如下,数据共用3组。{ "people":[ { "firstName":"Brett", "lastName":"McLaughlin", "email":"brettM@abc.com" }, { "firstName":"Jason",
2020-12-22 03:06:57 1174
原创 快速对比数据
实例需求:日常工作中经常需要对比数据,例如如下的参会名单,现在需要对比两届参会名单的异同,100个人的名单,看得老眼昏花也未必能够准确的找出差异。Function strCompare(ByVal Rng1 As Range, ByVal Rng2 As Range) As String Dim strRemove As String, strAdd As String, strKey Dim currDic, newDic, c Set currDic = CreateObj
2020-12-21 04:08:48 1712 2
原创 BI神器Power Query(23)-- 同一列内多重替换(3)
示例需求:省份清单中“自治区”名称过长,在做报表展示时效果不理想,希望将其替换为简称,例如:内蒙古自治区替换为“内蒙古”。这个直接使用Excel中的替换也可以实现,毕竟只有5个自治区需要替换,接下来看看Power Query中如何实现。单击选中数据表中任意单元格,例如A6,依次单击【数据】>【自表格/区域】,打开Power Query编辑器。第一个方法参见:BI神器Power Query(21)-- 同一列内多重替换(1)M代码如下:let 源 = Excel.CurrentWork
2020-12-19 14:08:19 3266 2
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人