如何高效将同一行的值快速合并

ak47ok · 发表于 2015-8-25 13:44

如题、详见附件，有劳高手！

山菊花 · 发表于 2015-8-25 13:59

=PHONETIC(B1:Z1)

2019032 · 发表于 2015-8-25 14:00

=PHONETIC(B1:Z1)

复制代码

ak47ok · 发表于 2015-8-25 14:13

谢谢两位老师的帮助。
此公式对数字无效？

wangg913 · 发表于 2015-8-25 14:39

对引用中存在的公式结果或非文本都无效。
也就是不是由公式生成的文本。但对透视表有效。

zax010 · 发表于 2015-8-25 18:32

Sub zz()
For i = 1 To [b65536].End(3).Row
      lc = Cells(i, "p").End(xlToLeft).Column
      a = Cells(i, 2).Resize(1, lc - 1)
      Cells(i, "aa") = Join(Application.Index(a, 1, 0), "")
Next
End Sub

zax010 · 发表于 2015-8-25 18:34

>>>>>>>>>>>>>>>>>>>>>>>>>

如何高效将同一行的值快速合并.rar (7.19 KB, 下载次数: 31)

stepforward9 · 发表于 2015-8-25 20:27

正是我所需要的呢，实用{:soso_e100:}

满坛皆为吾师 · 发表于 2015-8-26 23:53

对数字生效

=CONCATENATE(B1,C1,D1,E1,F1,G1,H1,I1,J1,K1,L1,M1,N1)

复制代码

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

[求助] 如何高效将同一行的值快速合并

评分

评分