将 2 列合并为 1 行
Combining 2 columns into 1 row
我有如下数据:
ID GroupID from To
1 2 A B
1 2 B C
我想将它作为 "A/B/C" 合并为 2(GroupID) 的单个值。
我需要的结果:
A/B/C
如果
ID GroupID from To
1 2 A C
1 2 B A
结果必须是A/B/C/A
提前致谢。
终于在工作了 4 小时后我找到了解决方案,尝试告诉我。
创建一个公式@Concat
并编写下面的代码并详细放置:
Shared Stringvar firstcol;
Shared Stringvar seccol;
firstcol:=firstcol+{From}+"/";
seccol:=seccol+{To}+"/";
现在再创建一个公式 @Display
并根据要求放在页脚(组或报表)中。
Shared Stringvar firstcol;
Shared Stringvar seccol;
Local Stringvar third;
Local Numbervar i;
Local Stringvar final;
Local StringVar array store;
third:=firstcol+seccol;
store:=Split(third,"/");
For i:=1 to UBound(Split(third,"/")) Do
(
if (store[i]="")
then exit for;
if store[i] in final
then final:=final+store[i+2]+"/"
else final:=final+store[i]+"/"
);
Left (Replace(final,"//","/"), Length(Replace(final,"//","/"))-1);
我有如下数据:
ID GroupID from To 1 2 A B 1 2 B C
我想将它作为 "A/B/C" 合并为 2(GroupID) 的单个值。
我需要的结果:
A/B/C
如果
ID GroupID from To 1 2 A C 1 2 B A
结果必须是A/B/C/A
提前致谢。
终于在工作了 4 小时后我找到了解决方案,尝试告诉我。
创建一个公式@Concat
并编写下面的代码并详细放置:
Shared Stringvar firstcol;
Shared Stringvar seccol;
firstcol:=firstcol+{From}+"/";
seccol:=seccol+{To}+"/";
现在再创建一个公式 @Display
并根据要求放在页脚(组或报表)中。
Shared Stringvar firstcol;
Shared Stringvar seccol;
Local Stringvar third;
Local Numbervar i;
Local Stringvar final;
Local StringVar array store;
third:=firstcol+seccol;
store:=Split(third,"/");
For i:=1 to UBound(Split(third,"/")) Do
(
if (store[i]="")
then exit for;
if store[i] in final
then final:=final+store[i+2]+"/"
else final:=final+store[i]+"/"
);
Left (Replace(final,"//","/"), Length(Replace(final,"//","/"))-1);