how can I find merged cells in a large xl-file

T

tvanellen

I received a large xl-file, in which I want to execute some sorting
operations. However, I get the error message that "this operation requires
the merged cells to be identically sized". I guess some cells are merged, but
does anybody know how I can quickly find the merged cells?
 
A

Ardus Petus

Sub showMerged()
Dim cell As Range
For Each cell In ActiveSheet.UsedRange.Cells
If cell.MergeCells Then
MsgBox "cell " & cell.Address & vbLf & _
"Merge area: " & cell.MergeArea.Address
End If
Next cell
End Sub

HTH
 
H

hai6734

the simple way is:
- select all cells of the table which you want to sort data;
- click menu Format \ Cell, and unchecked the Merge cell in Alignment tab

now you can use sorting function ok
 
T

tvanellen

thanx

Ardus Petus said:
Sub showMerged()
Dim cell As Range
For Each cell In ActiveSheet.UsedRange.Cells
If cell.MergeCells Then
MsgBox "cell " & cell.Address & vbLf & _
"Merge area: " & cell.MergeArea.Address
End If
Next cell
End Sub

HTH
Click to expand...
 
T

tvanellen

thanx

hai6734 said:
the simple way is:
- select all cells of the table which you want to sort data;
- click menu Format \ Cell, and unchecked the Merge cell in Alignment tab

now you can use sorting function ok
Click to expand...
 
V

Vivian H.

IThank You! i knew there had to be a select all option yet couldn't figure it
out. This has solved many times of turmoil.
Vivian H.
 
Top