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”）

所采用的方法取决于：

是否要使用VBA或工作表公式。在您的示例中，您有VBA，但它可能不是强制性的，甚至可能是避免的（这通常是我的选择，除非需要VBA）

您希望结果是数字还是字符串（您要求的是字符串，这是更简单的选项）

非VBA提供字符串（来自整数或单元格A1中的字符串），如下所示：

---

使用VBA，使用TimWilliams的解决方案（

Range（“a1”）.Value=“'0”&text

，而不是代码的最后一行）。

您需要将单元格格式化为文本，或者在值前面加上

”

@TimWilliams:这是一个有效的答案；）@TimWilliams:谢谢。成功了，我不明白。如果它是非VBA，是否仍必须使用visual basic？如果不是，我应该把它放在哪里？@עמסרום-它是一个工作表公式（不是visual basic；如前所述，通常是我的选择，除非需要VBA）。如果源代码位于单元格A1中（如示例代码所示），请键入我在任何其他单元格中提供的公式。您将不需要VBA。PS：名字有自动补全功能很好，我不知道如何键入Amos。。。

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