Excel宏代码快速更改大小写

绿色童年上网控制软件转载

经常用Word的朋友都知道，在Word中可以方便地更改英文字符的“大写”、“小写”、“句首字母大写”和“词首字母大写”。

但这些功能Excel没有，如果想在Excel中使用这些功能就必须手动修改或者用复杂的公式来进行转换。其实我们可以编写相关的宏，一劳永逸地解决这个问题。

首先绘制四个命令按钮，将按钮上的文字更改为“全部大写”、“全部小写”、“句首字母大写”和“词首字母大写”。接着分别为每个按钮编写相应的宏代码。

比如“全部大写”按钮，输入代码：

代码片段：

Sub 全部大写（）

Dim itarget As Range

Set itarget = Selection

For Each ran In itarget

'将单元格内容转换为大写形式

ran.value = UCase（ran）

Next

End Sub

右击“全部小写”按钮，输入代码：

Sub 全部小写（）

Dim itarget As Range

Set itarget = Selection

For Each ran In itarget

'将单元格内容转换为小写形式

ran.value = LCase（ran）

Next

End Sub

完成以上操作后按钮就可以使用了。选中目标单元格区域，单击相应的转换按钮，被选中的英文字符就立即转换成我们想要的大小写了。

绿色童年上网控制软件转载

TAGS:

版权声明：绿色童年网站所刊载本文："Excel宏代码快速更改大小写"，除特别声明外，其版权均属于绿色童年所有，任何媒体、单位或个人未经本网书面授权不得以任何形式转载、摘编、改编或以其他方式复制发表。否则，绿色童年将依法追究其法律责任。