如何向范围添加文本

Question

我所拥有的：

Range("A" & i+1).value=Range("B" & i).value

我需要什么：

"'" & Range("A" & i+1).value=Range("B" & i).value

我需要的输出：

'1234

如何使用我试图通过其他功能实现的VBA添加这种类型的文本，但这给我一个错误

Answer 1

您的订单混乱了：

Range("A" & i+1).value = "'" & Range("B" & i).value

Answer 2

如果您需要将给定的单元格设置为文本格式，那么这是一个可行的解决方案：

Sub TestMe()
    Range("A1").NumberFormat = "@"
    Range("A1") = 1234
End Sub