首页 > 办公 > Excel > 正文

Excel新增按钮快速更改大小写的方法

2024-08-23 19:35:10
字体:
来源:转载
供稿:网友

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

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

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

比如“全部大写”按钮,输入代码:  

代码片段:  

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

 

Sub 全部大写()           Dim itarget As Range           Set itarget = Selection           For Each ran In itarget           '将单元格内容转换为大写形式           ran.value = UCase(ran)           Next           End Sub



右击“全部小写”按钮,输入代码:  

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

 

Sub 全部小写()          Dim itarget As Range          Set itarget = Selection          For Each ran In itarget          '将单元格内容转换为小写形式          ran.value = LCase(ran)          Next          End Sub
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表