excel怎么用公式从A-B列,自动得到C-D列?

发布网友发布时间：2023-08-06 23:37

共4个回答

热心网友时间：2024-12-02 14:43

C列公式=INDEX(A:A,SMALL(IF(LEN(B$2:B$4)-LEN(SUBSTITUTE(B$2:B$4," ",))+1>=COLUMN(A:J),ROW($2:$4),5),ROW(A1)))&""

D列公式=TRIM(MID(SUBSTITUTE(INDEX(B:B,SMALL(IF(LEN(B$2:B$4)-LEN(SUBSTITUTE(B$2:B$4," ",))+1>=COLUMN(A:J),ROW($2:$4),5),ROW(A1)))," ",REPT(" ",99)),1+99*(E2-1),99))

在E列加了一个辅助列=(C2=C1)*E1+1，主要是A列有重复，实在想不起来咱们构建这个内存数组了！

热心网友时间：2024-12-02 14:43

多不多？

不多的话可以用此方法

1）【分列】。选中B列，再用用空格分列，如下图：

2）复制，粘贴的时候，选择转置，再调整下就行了。如下图：

如果内容多就不太适合，可写代码。

热心网友时间：2024-12-02 14:44

学点VB吧，好让懂vb的挣点。追问VB也行，得告诉我怎么用哈哈。

追答可以建立新的沟通渠道上传文件。私信我或评论后我私信你。

热心网友时间：2024-12-02 14:44

i = 2
y = 2
Do While Sheet1.Cells(i, 1) <> ""
a = Split(Sheet1.Cells(i, 2), " ")
For m = 0 To UBound(a)
Sheet1.Cells(y, 3) = Sheet1.Cells(i, 1)
Sheet1.Cells(y, 4) = a(m)
y = y + 1
Next m
i = i + 1
Loop追问代码好像不全，能否发个全的，能直接运行的谢谢