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 End Sub '结束过程 假设源数据在A列,所以上面代码的range A。具体应用,自己进行简单修改了。 此内容属于进阶,一般的童鞋灵活运用upper ,lower这几个函数就行了。 本篇结束。
posted @ 2019-12-18 16:00  grj001  阅读(369)  评论(0编辑  收藏  举报