Obviously I do agree with "Avoid merged cells anytime." but if someone insists on it, this would be way around it for this case.
At the beginning and at the end.
Cells(j, i).Resize(6, 2).MergeCells = Cells(j, i).Resize(6, 2).MergeCells = False
Obviously I do agree with "Avoid merged cells anytime." but if someone insists on it, this would be way around it for this case.
At the beginning and at the end.
Cells(j, i).Resize(6, 2).MergeCells = Cells(j, i).Resize(6, 2).MergeCells = False