新用户扫码下载
扫码下载APP
及时接收最新考试资讯及
备考信息
工作表中的小写字母都变成大写
请运行以下程序：
Sub ConvertToUpperCase()
Dim Rng As Range
Worksheets("Sheet1").UsedRange.Select
For Each Rng In Selection.Cells
If Rng.HasFormula = False Then
Rng.value = UCase(Rng.value)
End If
Next Rng
End Sub
责任编辑：zoe
上一篇：调整excel单元格宽度三妙法
下一篇：现金流量表模板
相关资讯
实务学习指南
距6月报税结束还有天
新用户扫码下载
京公网安备 11010802044457号