在Excel中的单元格中的数据之间插入分号

问题描述 投票:1回答:2

我在A,C,E和G列中有数据。我希望第I列保存以分号分隔的所有数据,我已经在网上搜索了但我发现的是如何用分号替换换行符并且没有做到了。下面是我尝试使用的3段代码

Range("I" & i).Value = "=A" & i & Chr(59) & "&" & "C" & i & "&" & "E" & i & "&" & "G" & i
Range("I" & i).Value = "=A" & i & "&C" & i & "&E" & i & "&G" & i
Range("I" & i).Value = Range("A" & i).Value + ; + Range("C" & i).Value + ; + Range("E" & i).Value + ; + Range("G" & i).Value

第二行最接近我想要的但是当我添加&“;”时进入它我得到错误。

任何想法都完全赞赏

已解决:这是通过下面的答案解决的,我已经管理了我自己的修复,我将详细说明,但接受的答案是更清洁,更有效的方式

mystring =“= A”&i&“&”&Chr(34)&“;” &Chr(34)&“&C”&i&“&”&Chr(34)&“;” &Chr(34)&“&E”&i&“&”&Chr(34)&“;” &Chr(34)&“&G”&i Range(“I”&i).Value = mystring

excel vba string
2个回答
4
投票

你应该使用"&"";"""

详细地说,你应该使用类似的东西

"=A" & i & "&"";""" & "&C" & i

结果导致

=A1&";"&C1

假设i = 1


0
投票
=CONCATENATE(A1, ";", C1, ";", E1, ";", G1)

使用VBA

Range("A2").FORMULA = REPLACE("=CONCATENATE(A1, ';', C1, ';', E1, ';', G1)", "'", CHR(34))
© www.soinside.com 2019 - 2024. All rights reserved.