excel用VBA将文本字符串的首字母变成大写

下面的VBA代码可以将活动工作表中的所有文本字符串的首字母改为大写，对包含公式单元格则不作更改。

Sub CapitalizeFirstLetter()Dim Rng As RangeActiveSheet.UsedRange.SelectFor Each Rng In Selection.CellsIf Rng.HasFormula = False ThenRng.Value = Application.WorksheetFunction.Proper(Rng.Value)End IfNext RngEnd Sub

如想转载该文章请注明出处：强国说学习-qiangguoshuo.com

转载声明：本站发布文章及版权归原作者所有，转载本站文章请注明文章来源！

本文链接：https://www.qiangguoshuo.com/excel/70136.html