Excel vba中chr函数实例用法

本文介绍VBA中chr函数的用法，通过简单举例理解chr函数，并最后总结chr函数常用的转换码。

第一：chr函数用法介绍

chr是什么函数呢？excel VBA中chr函数是将一个ASCII码转为相应的字符。

chr函数的语法为：Chr(charcode)

其中的参数charcode：0 至 31 之间的数字与标准的非打印 ASCII 代码相同。例如，我们经常使用到的Chr(10) 可以返回换行字符。

charcode 的正常取值范围为 0 – 255。然而，在 DBCS 系统，charcode 的实际范围为 -32768 到 65535。

第二，chr函数简单举例

比如：[a1] = Chr(65)。A1单元格将返回chr(65)对应的一个大写字母A。

MyChar = Chr(97) ‘ 返回 a。
MyChar = Chr(62) ‘ 返回 >。
MyChar = Chr(37) ‘ 返回 ％。

比如下面这段代码，就是用chr函数实现在A1：A26自动生成ABCDE……Z这样的大写字母。

Sub chr函数转换()
Dim a, b As Byte
For a = 1 To 26
Cells(a, 1) = Chr(64 + a)
Next
End Sub

总结：chr函数用得最多的就是Chr(10) 换行，以及26个大小写字母。将上面这段代码Chr(64 + a)改为：Chr(96 + a)，就是在A1：A26自动生成abcdef……z这样的小写字母。