阅读 96

键盘大写小写转换(负数大写金额书写规范)

No.1

英文字母分大小写,如何相互转换大小写,也是一个很常用的功能。

统一的大小写可以让表格看起来更加美观。

本节介绍两个VBA函数,实现字母大小写转换。

No.2

小写字母转换成大写字母

使用UCase函数,可以将小写字母转换成大写字母,转换的对象为字符串,数字或符号没有意义保持不变,如果本身就是大写字母,也保持不变。

语法:

UCase(String)

示例:

Dim Str as String
Str="AbcDef"
msgbox UCase(Str)'输出"ABCDEF"

No.3

大写字母转换成小写字母

使用LCase函数,可以将大写字母转换成小写字母,转换的对象为字符串,数字或符号没有意义保持不变,如果本身就是小写字母,也保持不变。

语法:

LCase(String)

示例:

Dim Str as String
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")
For Each Xcell In cell
    With Xcell
        .Offset(0, 1).Value = LCase(.Value)
        .Offset(0, 7).Value = UCase(.Value)
    End With
Next Xcell
End Sub

本例代码精简成几行,如果认真学习它的用法的时候,可以写出详细的使用过程。

这里就偷懒了。

顺便说一下,如果想要使首字母变成大写可以使用如下代码:

Ranges.Characters(1, 1).Text = UCase(.Characters(1, 1).Caption)

用到Characters对象进行第一个字母设置。

大小写字母转换很简单,如果合理应用,可以起到很重要的作用,在一些数据检索当中,会用到,所以要知道并学会应用。

文章分类
百科问答
版权声明:本站是系统测试站点,无实际运营。本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发送邮件至 XXXXXXo@163.com 举报,一经查实,本站将立刻删除。
相关推荐