excl vba 字母大写变小写

Sub gbzmdzx()

Dim n As Integer, m

For n = 2 To 380

m = Sheet1.Cells(n, 5) 'cells(行，列）

Sheet1.Cells(n, 6) = LCase(m) 'cells(行，列）‘大写变小写

Next

End Sub

如果小写变大写，则用UCase()