vba中chr函数实例用法

第一：chr函数用法介绍

chr是什么函数呢？excelVBA中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这样的大写字母。

Subchr函数转换()
   Dima,bAsByte
   Fora=1To26
   Cells(a,1)=Chr(64+a)
   Next
EndSub

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