使用VBA大写首字母

如何使用VBA格式化Excel表单中的单词，使首字母大写，后跟每个单词中的小写字母？ 我知道大写和小写的代码，但格式化整个单词，包括相同的第一个字母。 我不好意思，如果你觉得这个问题很愚蠢，但是因为我是VBA的新手，所以我只是好奇而已，如果任何人都可以帮忙的话。

Answer 1

PROPERfunction应该有所帮助。 详情请参阅此 。

使用VBA

 Sub Demo() Dim ws As Worksheet Dim rng As Range, cel As Range Dim lastRow As Long Set ws = ThisWorkbook.Sheets("Sheet3") 'change Sheet3 to data sheet With ws lastRow = .Cells(.Rows.Count, "A").End(xlUp).Row For Each cel In .Range("A1:A" & lastRow) cel.Offset(0, 1).Value = Application.Proper(cel.Value) Next End With End Sub 

使用公式

 =PROPER(A1) 

Answer 2

这被称为正确的情况 。 您可以使用以下行将单元格值转换为正确的大小写：

 YourCell.Value = StrConv(YourCell.Value, vbProperCase)