2、把以下内容（英文部分）拷贝到VBA编辑器中：
（大写转小写） Sub zhuanhuan() Dim c As Range
For Each c In Range(\"A1:f100\") c = LCase(c) Next End Sub
（小写转大写）： Sub zhuanhuan() Dim c As Range
For Each c In Range(\"A1:f100\") c = uCase(c) Next End Sub
拷贝完后，注意修改(\"A1:f100\")里的值，这里表示你要把哪些区域的单元格内容进行大小写转换。 3、全部OK以后，按“运行宏”的按钮或选项。 4、检查完成情况。
因篇幅问题不能全部显示，请点此查看更多更全内容