2024-11-05 00:16:35
J5数组公式:
=INDIRECT(TEXT(SMALL(IF($B1:$H5<>"",ROW(1:5)/1%+COLUMN($B:$H),10001),COLUMN(A1)),"R0C00"),)&""
按CTRL+SHIFT+回车键结束公式,右拉。
2024-11-05 06:44:11
Function lianjie(rng)
For Each r In rng
lianjie = lianjie & r
Next
End Function
自定义函数lianjie():复制上面代码,按alt+f11进入vba,插入模块,粘贴代码,回到工作表,输入公式即可。
2024-11-05 00:49:12