新函数班级的学员提了一个问题:如何去除数字后面的0?


这种情况比较特殊,通常情况下,0都是在数字前面。


要去除前面的0就比较容易,只要让数字参与运算就可以。


再将数字反转过来,就是最终的结果。


也就说,要从A列变成D列的最终效果,需要先实现将数字反转过来,再去除数字前面的0,最后再一次将数字反转。


在常规的函数中没有反转函数,而VBA中StrReverse函数就是反转函数。这里,卢子教你一步步使用自定义函数。


以下内容,WPS不可以使用。


Step 01 按快捷键Alt+F11,插入模块。


Step 02 输入一段非常简单的代码,意思就是自定义一个函数叫反转数字,这个函数只有一个参数。

Function 反转数字(Str As String)

反转数字 = StrReverse(Str)

End Function


Step 03 在单元格输入自定义函数,这样就完成了一个简单的自定义函数的全部操作过程。


在VBA中,其实也可以跟常规公式一样,实现嵌套,在函数前面加--就实现去除前面的0。

Function 反转数字(Str As String)

反转数字 = --StrReverse(Str)

End Function


说明,这样用Val也可以将文本转换成数字。

反转数字 = Val(StrReverse(Str))


再嵌套一个反转函数StrReverse,就大功告成。

Function 反转数字(Str As String)

反转数字 = StrReverse(--StrReverse(Str))

End Function


其实入门Excel自定义函数并不难,有心学习都可以。

作者:卢子,清华畅销书作者;个人公众号:Excel不加班(ID:Excelbujiaban)