Question

excel中vba代码中的日期与数字怎么拼到一起转成文本格式？

如下图，A 列是日期，我需要在C列用A列的日期加上一个三位数的序号来填充，这个VBA代码怎么写
要求C1到Cn加入循环，

Answer 1

Sub test()
myrow = Range("A65536").End(xlUp).Row
For i = 1 To myrow
    Range("C" & i) = Format(Range("A" & i), "yyyymmdd") & Format(i, "000")
Next
End Sub

Answer 2

Format(Range("A" & i).value,"yyyymmdd") & Format(i,"000")