今天来分享一段代码 。大家先进入vba编辑器中，然后插入模块使用，复制进去 。
具体代码如下：
‘将A列转字母全部转换成小写
Sub test1() ‘设置TEST为过程的名称
Dim x As Integer ‘声明X为整数变量
For x = 1 To Range("A65536").End(xlUp).Row ‘设置X的范围为1到A列最后空白单元格的行数
Range("A" & x) = LCase(Range("A" & x)) ‘附值单元格Ax的格式全部转换为小写,如果是UCase,则转换成大写
Next x ‘循环X
【Excel vba实现字母全部转小写】End Sub ‘结束过程
假设源数据在A列，所以上面代码的range A 。具体应用，自己进行简单修改了 。
此内容属于进阶，一般的童鞋灵活运用upper ，lower这几个函数就行了 。
推荐阅读
- Excel VBA实现文件自杀
- Excel VBA代码：批量插入指定目录下指定类型所有图片
- Excel打印工作簿的操作和方法
- Excel双面打印的技巧
- 怎么改变Excel鼠标指针形状
- 怎么隐藏Excel格式工具栏
- 怎么查询Excel的版本号
- Excel最近工作报表里用的编程代码
- 怎么使Excel事件无效
- 怎么查询Excel的当前用户名