将%符号转换为vba中的string
我的问题很简单:我想要做的就是将“%”符号添加到包含数字数据的单元格中。 这是我写的代码:
Private Sub CommandButton21_Click() With Range("B11") .Select .Value = [B11] & ChrW(U + 37) End With End Sub
我得到的结果是数值数据除以100,%符号不加。 我试图用“%”代替ChrW(U + 37),但它不起作用。 我很新vba,所以我需要所有的帮助,我可以得到!
使用Cells(1, 5).NumberFormat = "0.00%"
, Range("B11").NumberFormat = "0.00%"
或[B11].NumberFormat = "0.00%"
来更改单元格的格式,而不是尝试添加字符到数字。 您可能需要将0.00更改为适合您需要的任何其他格式types。
你提到数据是数字的,如果你在计算中使用它,你可能想保持这种方式,改变格式应该是你的select。
使用下面的代码,它被testing,为我工作正常:
Sub Button1_Click() Sheet1.Cells(11, 2).Value = 200 Sheet1.Cells(11, 2).NumberFormat = "0.00%" End Sub
关于你的代码,你可能需要这样的东西:
[h6]= cstr([h6].text & ChrW(U + 37))
但是,它只是增加了H6的符号。