excel vba concat编号，新单元格中带有前导零和文本

Question

我已经使用vba复制了一个格式为“自定义“ 00000”的单元格

例如07455

当我尝试将此值复制到活动单元格并与文本连接时，我会放宽前导零。 这是我正在使用的代码-

ActiveCell.EntireRow.Cells(1, "B").Value = "WO-" & ws.Range("B12").Value

我尝试将目标（活动单元格）的格式设置为自定义“ 00000”，但我仍然丢失了零。

我最终得到的是 WO-7455 ，而不是 WO-07455

有人可以帮忙吗？

谢谢 克雷格

Answer 1

尝试：

ActiveCell.EntireRow.Cells(1, "B").Value = "WO-" & ws.Range("B12").Text

或（未测试）

ActiveCell.EntireRow.Cells(1, "B").Value = "WO-" & Format(ws.Range("B12").Value,"00000")

编辑：请注意，第一个选项将显示源单元格（B12）显示的内容。因此，如果列太窄以致显示为##或隐藏，则结果单元格可能无法显示您期望的结果。无论源单元格的列宽如何，第二个选项应始终有效。