excel 如何将三列数据自动转换三行一列为一组,如下图所示

将图1自动转换成图2，序号，品名，数量，客户编号不用考虑

2024-11-16 20:57:41

推荐回答（3个）

回答1：

把你当前选中的区域，复制，粘贴到一个新sheet中，粘贴时选择转置。
在A4单元格输入=B1，右拉加下拉。最终，A列就是你要带数据

回答2：

假设在A---D列
复制到F列
Sub aa()Dim IFor I = 2 To Range("B65536").End(xlUp).Row N = Range("f65536").End(xlUp).Row Range(Cells(I, "b"), Cells(I, "d")).Copy Cells(N + 1, "f").Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True Next End Sub

回答3：

E1用公式：
=OFFSET(B$1,ROW(A3)/3,MOD(ROW(A1)-1,3))
下拉。