张银的博客


Eat to live, but do not live to eat.

导航

Excel也能更改大小写

Posted on 2011-06-02 23:46  张银  阅读(1418)  评论(0编辑  收藏  举报

  经常用word的朋友都知道,在word中可以方便地更改英文字符的“大写”、“小写”、“句首字母大写”,但这些功能Excel没有,如果想在Excel中使用这些功能就必须手动修改或者用复杂的公式来进行转换。其实可以编写相关的宏,一劳永逸地解决这个问题。

  首先绘制出命令按钮,将按钮的文字更改为“全部大写”、“全部小写”。右击按钮,分别为每个按钮编写相应的宏代码。

sub 全部大写()
dim itarget as range
set itarger = 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

  句首字母大写和词首字母大写的代码太长,可到http://www.icpcw.com/bzsoft下载。选中目标单元格区域,单击相应转换按钮即可。