如何添加两个数字string？

我试图在单元格中显示一个数字string值与字符“0”在开始。 这是我的代码：

Sub test2() Dim text As String text = Range("A1").Value Range("a1").Value = "0" & text End Sub 

如果A1中的值是带有字母的，则它可以正常工作（例如，从“a”到“0a”），如果A1中的值是数字，则只显示第一个数值（例如从“11”到“11”而不是“011 “

Answer 1

采取的方法取决于：

1. 是否要使用VBA或工作表公式。 在你的例子中你有VBA，但它可能不是强制性的，甚至可能的话，如果可能避免（这通常是我的select，除非需要VBA）。

2. 无论你想要的结果是数字或string（你问一个string，这是更容易的select）。

一个非VBA，它给你一个string（从一个整数或单元格A1中的string），是

 ="0"&TEXT(A1,"0") 

使用VBA，使用TimWilliams的解决scheme（ Range("a1").Value = "'0" & text而不是代码的最后一行）。