excel - 列中值的长度

Question

我想知道 C 列（未知行）中的值是否包含 6 位数字。
如果不是，则在 B 列中添加一个或多个 0 以获得 6 位数字。

这里有一张图片可以更好地理解：

Dim nbchar As Integer
nbchar = Len(Columns("C"))

If IsNumeric(Columns("C") And (nbchar<6) Then
    Columns("B").Value = 0

标签： excelvba

Answer 1

不需要像 icodeplenty 所说的 VBA，excel 公式足以完成这项任务：

=IF(LEN(C1) < 6, REPT("0",6 - LEN(C1)))在单元格 B2 中并填写行。