Merging & multiplying cells

[adygelber]

Hello,

I want to merge some cells using a criteria. To be more specific, let's speak on the file attached.

Beginning with the P5 cell I want to merge to the right groups of 4 cells for each name from the column J. Therefore the first group of merged cells will be P5:S5, the next group will be T5:W5 and so on until reaches 11 groups of 4 cells. The last group will be BD5:BG5.

I tryied a script like this but it says that there is a syntax error on the "Else" instruction: Range(Range("AB5").End(xlToRight).Offset(0, 1), Range("AB5").End(xlToRight).Offset(0, nrCat)).Select

Please Login or Register  to view this content.

Thanks!

[patel45]

on attached file you have no value in cell O2, then nrCat = ""
nrCat = Range("O2").Value

[adygelber]

sorry...you're right...I changed the file

[patel45]

now you have merged range AB5:AE5, then what do you want obtain with ?

Please Login or Register  to view this content.

[adygelber]

As I said, I want to merge to the right groups of 4 cells for each name from the column L. Therefore the first group of merged cells will be P5:S5, the next group will be T5:W5 and so on until reaches 11 groups of 4 cells. The last group will be BD5:BG5.