×

文本 数字 三角 单撇 字符串

使用VBA往单元格写入数字后令其左上角显示绿色三角

鹭岛小千 鹭岛小千 发表于2022-02-23 22:08:49 浏览2634 评论0

抢沙发发表评论

【问题描述】如何使用VBA往单元格写入数字后令其左上角显示绿色三角?

64-1.png


【小千解答】数字单元格左上角显示绿色三角,说明该数据为“文本型数字”,可以使用以下3种方法:

方法1:数字之前加单撇

Sub xqoffice()
    Range("B2").Value = "'1"
End Sub


方法2:先将单元格格式改成“文本”,再输入经CStr函数转换后的数字。

Sub xqoffice2()
    Range("B4").NumberFormatLocal = "@"
    Range("B4").Value = CStr(100)
End Sub


方法3:定义一个字符串型变量,将数字赋值给该变量,再将单元格格式改成“文本”,写入该变量的值。

Sub xqoffice3()
    Dim xqVal As String
    xqVal = 9527
    Range("B6").NumberFormatLocal = "@"
    Range("B6").Value = xqVal
End Sub


打赏码.png


群贤毕至

访客