摘要： 今天来分享一段代码。大家先进入vba编辑器中，然后插入模块使用，复制进去。 具体代码如下：‘将A列转字母全部转换成小写Sub test1() ‘设置TEST为过程的名称Excel VBA...
今天来分享一段代码。大家先进入vba编辑器中，然后插入模块使用，复制进去。
具体代码如下：
‘将A列转字母全部转换成小写
Sub test1() ‘设置TEST为过程的名称
Excel VBA实现文件自杀
分享一段代码： ‘关闭文件时执行’文件自杀代码 Private Sub Workbook_BeforeClose(Cancel As Boolean) ActiveWorkbook.ChangeFileAccess xlReadOnly ‘将文件设置为只读模式 Kill Ac
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这几个函数就行了。
Excel vba注释符号和注释方法介绍
本文介绍excel中VBA注释说明方法，使用vba注释符号和REM语句来为代码添加注释。 Vba添加注释，可以使代码更具可读性，既方便自己，也方便以后可能检查源代码的其他人员。 Excel中为vba代码添加注释语句有两种方法，可以使用注释符号：单引号或者REM语句来实现。 不论使用vba注释符 (̵
