最初做票据打印的时候，通过一些自定义的函数实现“数字变大写”。后来VBA的技巧渐渐熟悉一些，开始用代码处理。
也是通过函数，但是更加巧妙和便捷了。
这里介绍一个单元格变化激发程序。
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Column = 1 And Target.Row = 1 Then
asd = Target.Value
Cells(1, 1) = dxje(asd)
End If
End sub
其中dxje（）为自定义函数。
[@more@]来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/24345566/viewspace-1050436/ ，如需转载，请注明出处，否则将追究法律责任。
请登录后发表评论
登录
全部评论
