Home/ Questions/Q 9027157
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-06-16T06:41:26+00:00

I have a database formatting problem in which I am trying to concatenate column

  • 0

I have a database formatting problem in which I am trying to concatenate column “B” rows based on column “A” rows. Like So:

https://docs.google.com/spreadsheet/ccc?key=0Am8J-Fv99YModE5Va3hLSFdnU0RibmQwNVFNelJCWHc

Sorry I couldn’t post a picture. I don’t have enough reputation points YET. I’LL Get them eventually though

So I’d like to solve this problem within Excel or Access. Its currently an access database, but I can export it to excel easily. As you can see, I want to find “userid” in column A and where there are multiple column A’s such as “shawn” I’d like to combine the multiple instances of shawn and concatenate property num as such.

Even though there are multiple instances of column A still, I could just filter all unique instances of the table later. My concern is how to concatenate column B with a “|” in the middle if column A has multiple instances.

This is just a segment of my data (There is a lot more), so I would be very thankful for your help.

The pseudo code in my head so far is:

If( Column A has more than one instance)
Then Concatenate(Column B with “#”+ “|” +”#”)

I’m also wondering if there is a way to do this on access with grouping.

Well Anyways, PLEASE HELP.

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team

    In excel we can achieve it easily by custom function in vba module. Hopefully using vba(Macros) is not an issue for you.

    Here is the code for the function which can be added in vba. (Press Alt+F11, this will take you to visual editor, right click the project and add a module. Add the below code in module)

    Public Function ConcatenatePipe(ByVal lst As Range, ByVal values As Range, ByVal name As Range) As String
ConcatenatePipe = ""
Dim i As Integer

For i = 1 To lst.Count
    If name.Value = lst.Item(i).Value Then ConcatenatePipe = ConcatenatePipe & "|" & values.Item(i).Value
Next
ConcatenatePipe = Mid(ConcatenatePipe, 2)
End Function

    This function you can use in excel in F Column of your example. Copy the below formulla in F2 and the copy paste the cell to rest of F column. =ConcatenatePipe($A$2:$A$20,$B$2:$B$20,E2)

    • 0