Array formula to Concatenate skipping blank cells and duplication

Hi All

I found an array formula using Textjoin function that will concatenate data in a set range of cells and skip over blanks. The below formula works perfectly horizontally.

{=TEXTJOIN(", ",TRUE,INDEX(4:4,,N(IF({1},MODE.MULT(IF((IFERROR(MATCH(C4:M4,C4:M4,0)=COLUMN(C4:M4)-MIN(COLUMN(C4:M4))+1,0))*(C4:M4<>""),COLUMN(C4:M4)*{1;1}))))))}

However, when trying to enhance the formula to work vertically i cannot get it to work. (I have ensured that the array ({}) brackets are applied in my attempts)

I have attached a working file of what i am trying to achieve and the working horizontal formula and workings

Can someone please help

Regards

VB

One option

Formula:

Please Login or Register  to view this content.

suffice to say the same approach could be applied for horizontal, by amending range references and modifying ROW references to COLUMN

Formula:

Please Login or Register  to view this content.

Thanks very much Xlent! Works perfectly!