在Excel中,我在A列中有一个更大的值列表:
John
Jim
Joanne
Jenny在excel中,有没有一种方法可以将这些值复制粘贴到B列中,而不是为每个条目创建N个副本?例如,使用N=3时,结果应该如下所示:
John
John
John
Jim
Jim
Jim
Joanne
Joanne
Joanne
Jenny
Jenny
Jenny发布于 2021-04-16 19:14:47
据我所知,不是字面上的复制和粘贴,但在Excel 365中使用溢出公式相当容易:
=INDEX(A:A,QUOTIENT(SEQUENCE(COUNTA(A:A)*3,1,0),3)+1)

在早期版本的Excel中,您可以执行以下操作:
=INDEX(A:A,QUOTIENT(ROW()-1,3)+1)或(避免空白单元格为零)
=IF(ROW()>COUNTA(A:A)*3,"",INDEX(A:A,QUOTIENT(ROW()-1,3)+1))然后把它拉下来。
发布于 2021-04-16 19:31:58
Sub NameCopy()
Dim r As Long
Dim i As Integer
Dim n As Integer
Dim c As Range
Dim lastrow As Long
r = 1
n = 3
lastrow = Cells(Rows.Count, 1).End(xlUp).Row
For Each c In Range("A1:A" & lastrow)
For i = 1 To n
Cells(r, 2).Value = c.Value
r = r + 1
Next i
Next c
End Subhttps://stackoverflow.com/questions/67124004
复制相似问题