在VBA中连接0

Question

我有两列（第一列包含值0，第二列包含值1）。

此语句返回1，而不是01

Cells(1, 26).Value = CStr(Cells(1, 24).Value) & CStr(Cells(1, 25).Value)

我想在第3列中将它们连接到01。我该怎么做？

Answer 1

在单元格中放入整数值时，格式设置为number。 您可以使用：

Cells(1, 26).NumberFormat = "@" 'This set cell format to Text
Cells(1, 26).Value = CStr(Cells(1, 24).Value) & CStr(Cells(1, 25).Value)