首页
学习
活动
专区
圈层
工具
发布
社区首页 >问答首页 >如何系统地将一列中的条目复制到Excel中的另一列中

如何系统地将一列中的条目复制到Excel中的另一列中
EN

Stack Overflow用户
提问于 2021-04-16 19:00:15
回答 2查看 27关注 0票数 0

在Excel中,我在A列中有一个更大的值列表:

代码语言:javascript
复制
John
Jim
Joanne
Jenny

在excel中,有没有一种方法可以将这些值复制粘贴到B列中,而不是为每个条目创建N个副本?例如,使用N=3时,结果应该如下所示:

代码语言:javascript
复制
John
John
John
Jim
Jim
Jim
Joanne
Joanne
Joanne
Jenny
Jenny
Jenny
EN

回答 2

Stack Overflow用户

回答已采纳

发布于 2021-04-16 19:14:47

据我所知,不是字面上的复制和粘贴,但在Excel 365中使用溢出公式相当容易:

代码语言:javascript
复制
=INDEX(A:A,QUOTIENT(SEQUENCE(COUNTA(A:A)*3,1,0),3)+1)

在早期版本的Excel中,您可以执行以下操作:

代码语言:javascript
复制
=INDEX(A:A,QUOTIENT(ROW()-1,3)+1)

或(避免空白单元格为零)

代码语言:javascript
复制
=IF(ROW()>COUNTA(A:A)*3,"",INDEX(A:A,QUOTIENT(ROW()-1,3)+1))

然后把它拉下来。

票数 0
EN

Stack Overflow用户

发布于 2021-04-16 19:31:58

代码语言:javascript
复制
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 Sub
票数 1
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/67124004

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档