用VBA把指定区域英文字母 第一个字母为大写

laoau138

用VBA把指定区域英文字母  第一个字母为大写

望帝春心

1. Sub test()
   
2.     Dim rng As Range, cell As Range
   
3.     Set rng = Application.InputBox("请选择要转换的区域", "区域", , , , , , 8)
   
4.     For Each cell In rng
   
5.         cell.Value = StrConv(cell.Value, 3)
   
6.     Next
   
7. End Sub

复制代码

grf1973

直接用公式=Proper(A1)