Unmerging excel rows, and duplicate data

Question

I have been given a fairly large database stored in Microsoft Excel, which I have to try convert into something useful.
However, one of the problems that I am encountering is that some of the data is merged together (horizontally in 2s).

For example;

row 1: [ x ][ x ][ x ][ x ][ x ] row 2: [ x ][ x ][ o    o ][ x ] row 3: [ o    o ][ x ][ o    o ] 

Where x's are single cells and o's are merged together

What I want to do is unmerge all the rows (which I could do fairly easy with the unmerge button), but for where the merged cell was, have the data duplicated across the 2 cells.
From; [[ Some Data ]]
To; [ Some Data ][ Some Data ]

Thanks! Any help is appreciated.

Answer 1

This is a VBA solution. This macro will search every cell in the active sheet to see if they are merged. If they are, it stores the range of the merged cells in a temp. range variable, unmerges the cells, then fills the range with the value of the first cell in the unmerged range (what the value was).

Sub UnMergeFill()  Dim cell As Range, joinedCells As Range  For Each cell In ThisWorkbook.ActiveSheet.UsedRange     If cell.MergeCells Then         Set joinedCells = cell.MergeArea         cell.MergeCells = False         joinedCells.Value = cell.Value     End If Next  End Sub 

Answer 2

1. Select the range which has merged data
2. Click on Merge and Centre to unmerge cells
3. Select the range of data again
4. Press Ctrl+G > Special > Blanks
5. Press = and up arrow key
6. Press Ctrl+Enter