在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)