掃碼下載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
下一篇:現(xiàn)金流量表模板
Copyright © 2000 - m.sinada.com.cn All Rights Reserved. 北京正保會計科技有限公司 版權所有
京B2-20200959 京ICP備20012371號-7 出版物經(jīng)營許可證 京公網(wǎng)安備 11010802044457號
套餐D大額券
¥
去使用