经常用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 |
完成以上操作后按钮就可以使用了。选中目标单元格区域,单击相应的转换按钮,被选中的英文字符就立即转换成我们想要的大小写了。
IT时代网(关注微信公众号ITtime2000,定时推送,互动有福利惊喜)所有原创文章版权所有,未经授权,转载必究。
创客100创投基金成立于2015年,直通硅谷,专注于TMT领域早期项目投资。LP均来自政府、互联网IT、传媒知名企业和个人。创客100创投基金对IT、通信、互联网、IP等有着自己独特眼光和丰富的资源。决策快、投资快是创客100基金最显著的特点。
小何
小何
小何
小何