在Excel VBA中，处理身份证号或银行卡号等长位数数值时，输出到单元格可能会变为科学计数法或丢失原始数据。为避免数值误修改，可以使用特定函数转换数组。本文分享了一个私有函数`varKeepDateRight`，能够确保数组（包括一维和二维）中数值以文本格式保留，从而防止被系统误改。函数通过检查数组元素是否为数字，并将其转换为带前导单引号的文本形式。
ExcelVBA中我们大部分复杂运算都通过数组来实现，可是数组输出到单元格的时候，假如数字是身份证号/银行卡号等位数较高的数字的话，单元格会变成科学技术法数字或者是丢失原数值。
如图所示，为了确保数值在输出后不被误修改，需要对数组进行处理。
以上有好多种处理办法，以下是解决办法的一种：
以下分享我封装的好函数，可以确保数组不被误修改！该函数可以兼容一位数组和二位数组，实战中无需在判断一位数组而影响代码速度！
Private Function varKeepDateRight(arr As Variant)
Dim i As Long, j As Long
最低0.47元/天 解锁文章
扫一扫
1045
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
