今天來分享一段代碼。大家先進(jìn)入vba編輯器中，然后插入模塊使用，復(fù)制進(jìn)去。
具體代碼如下：
‘將A列轉(zhuǎn)字母全部轉(zhuǎn)換成小寫
Sub test1() ‘設(shè)置TEST為過程的名稱
Dim x As Integer ‘聲明X為整數(shù)變量
For x = 1 To Range("A65536").End(xlUp).Row ‘設(shè)置X的范圍為1到A列最后空白單元格的行數(shù)
Range("A" & x) = LCase(Range("A" & x)) ‘附值單元格Ax的格式全部轉(zhuǎn)換為小寫,如果是UCase,則轉(zhuǎn)換成大寫
Next x ‘循環(huán)X
End Sub ‘結(jié)束過程
假設(shè)源數(shù)據(jù)在A列，所以上面代碼的range A。具體應(yīng)用，自己進(jìn)行簡單修改了。
此內(nèi)容屬于進(jìn)階，一般的童鞋靈活運(yùn)用upper ，lower這幾個(gè)函數(shù)就行了。
