No.1
英文字母分大小写,如何相互转换大小写,也是一个很常用的功能。
统一的大小写可以让表格看起来更加美观。
本节介绍两个VBA函数,实现字母大小写转换。
No.2
小写字母转换成大写字母
使用UCase函数,可以将小写字母转换成大写字母,转换的对象为字符串,数字或符号没有意义保持不变,如果本身就是大写字母,也保持不变。
语法:
UCase(String)
示例:
Dim Str asString
Str=\"AbcDef\"
msgbox UCase(Str)输出\"ABCDEF\"
No.3
大写字母转换成小写字母
使用LCase函数,可以将大写字母转换成小写字母,转换的对象为字符串,数字或符号没有意义保持不变,如果本身就是小写字母,也保持不变。
语法:
LCase(String)
示例:
Dim Str asString
Str=\"AbcDef\"
msgbox LCase(Str)输出\"abcdef\"
No.4
实例说明
下图中将一列字符串转换成大写或小写。
这两个函数的应用,还是十分简单的。
主要应用于数据检索、录入、比较等方面。
VBA实际上对字母大小写不敏感,所以应用的时候也不十分确切。
重点是对于数据有字母大小写要求的情况下使用。
No.5
实例代码:
Private Sub CommandButton1_Click()
Dim cell As Range, Xcell As Range
Set cell = ActiveSheet.Range(\"B3:B7\")
ForEach Xcell In cell
With Xcell
.Offset(0, 1).Value = LCase(.Value)
.Offset(0, 7).Value = UCase(.Value)
EndWithNext Xcell
End Sub
本例代码精简成几行,如果认真学习它的用法的时候,可以写出详细的使用过程。
这里就偷懒了。
顺便说一下,如果想要使首字母变成大写可以使用如下代码:
Ranges.Characters(1, 1).Text = UCase(.Characters(1, 1).Caption)
用到Characters对象进行第一个字母设置。
大小写字母转换很简单,如果合理应用,可以起到很重要的作用,在一些数据检索当中,会用到,所以要知道并学会应用。
欢迎关注、收藏
---END---
★《布宫号》提醒您:民俗信仰仅供参考,请勿过度迷信!