Excel编写宏 新增按钮快速更改大小写
时间:2022-08-20 19:24:46
经常用Word的朋友都知道,在Word中可以方便地更改英文字符的“大写”、“小写”、“句首字母大写”和“词首字母大写”(图1)。
但这些功能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
完成以上操作后按钮就可以使用了。选中目标单元格区域,单击相应的转换按钮,被选中的英文字符就立即转换成我们想要的大小写了(图2)。
标签:Excel编写宏,新增按钮快速更改大小写
0
投稿
猜你喜欢
word中如何将页眉中页码显示在图片上
2023-11-30 01:38:09
wps中如何批量清除回车符教程
2022-04-05 17:34:47
excel表格录入日期的教程
2023-04-27 23:16:02
wps ppt怎么设置字体倒影
2023-12-08 11:37:21
winxp更改U盘背景技巧(附代码)
2022-09-16 13:53:09
如何快速移动Word文字?
2023-11-27 17:28:52
怎么查看Win10端口是否开启?Win10查看端口是否开启的方法
2022-09-16 04:30:28
PowerPoint换片方式怎么设置
2023-01-30 12:19:43
如何使用wps演示制作灯笼动画
2023-01-28 18:13:45
Excel中如何筛选出自己想要的内容
2022-12-06 08:56:39
WPS表格应用技巧—-如何跨列隔行粘贴
2023-09-16 08:36:53
win8.1系统Chrome浏览器出现"没有注册类"的解决方法
2023-10-10 22:29:56
ghoststarttrayapp.exe是什么进程 有什么作用 ghoststarttrayapp进程查询
2023-08-02 17:54:45
网银盾无法识别?Win8建行网银盾无法识别的解决
2022-06-23 22:52:57
回顾微软30年 Windows1.0到Win10是如何发展演变的
2023-01-20 15:23:09
家庭宽带光纤猫、无线路由器常见问题及解决方案
2023-03-10 06:02:17
win10安全模式重置电脑怎么弄_win10安全模式重置电脑教程
2023-09-16 03:34:24
Windows7系统创建虚拟磁盘分区的方法是什么
2022-08-20 21:01:16
2018优酷免费领取30天会员在哪?优酷30天会员怎么领
2023-06-03 02:37:55
华为手机助手怎么恢复老版本?
2023-06-09 23:25:21