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對象進行第一個字母設置。
大小寫字母轉換很簡單，如果合理應用，可以起到很重要的作用，在一些數據檢索當中，會用到，所以要知道並學會應用。
原創文章，作者：投稿專員，如若轉載，請註明出處：https://www.506064.com/zh-hk/n/269363.html
微信掃一掃 
支付寶掃一掃 