这个是不是只能用VBA才可以实现?

jsjcjsjc · 发表于 2024-2-22 22:13

如图,主要是希望在B列使用"&"累加到断点之前那一行...是不是只能上VBA了?有简单的办法吗?
感谢

test.zip (7.7 KB, 下载次数: 8)

丢丢表格 · 发表于 2024-2-22 22:53

=IFNA(IF(AND(A2="",MATCH("国",A3:A20)),CHOOSE(RANDBETWEEN(1,3),"烂尾楼","开发商","地皮贵")&MATCH("中",A$2:A2)-ROW()+1,IF(A3="",CONCAT(OFFSET(B3,,,MATCH(A2,A3:A20,)-1)),"")),"")

世界客都 · 发表于 2024-2-22 22:57

没看懂应该把公式写在哪里

丢丢表格 · 发表于 2024-2-22 23:10

世界客都发表于 2024-2-22 22:57
没看懂应该把公式写在哪里

具体意思好像是：
在黄色单元格写公式，把分项内容合并在分项行中。

丢丢表格 · 发表于 2024-2-22 23:23

世界客都发表于 2024-2-22 22:57
没看懂应该把公式写在哪里

黄色行的公式：

=IFERROR(CONCAT(OFFSET(B3,,,MATCH(A2,A3:A20,)-1)),"")

（他来个乱七八遭，我就给他个乌七八糟）

fzxba · 发表于 2024-2-23 07:46

Sub 路过()
Dim ar, i As Long, p As Long
ar = Range("A1").CurrentRegion.Resize(, 2)
For i = 2 To UBound(ar)
If Len(ar(i, 1)) Then
p = i
ar(p, 2) = ""
Else
ar(p, 2) = ar(p, 2) & ar(i, 2)
End If
Next
Range("A1").Resize(i - 1, 2) = ar
End Sub

复制代码

hcm19522 · 发表于 2024-2-23 15:31

C2{=IFERROR(IF(A2="","",PHONETIC(OFFSET(B3,,,MATCH(1=1,A3:A20<>"",)-1))),"")

		自动登录	找回密码
密码			免费注册

[求助] 这个是不是只能用VBA才可以实现?

评分

评分

最新热点 /1