I have a range of merged cells with values in them. I would simply like to read the value contained in each merged cell. The amount of cells in the merge area varies. Right now I have this:
Sub testnoms() Dim cell As Range For Each cell In ActiveSheet.Range("B20:K23") 'this would be the range to look at Debug.Print cell.MergeArea.Cells(1, 1).Value Next End Sub
Right now it goes to every cell in the range and returns the value in its merged area. So I get the right values, but I have a duplicate for every cell in the merged area. For example, if 5 cells are merged together, it prints 5 times the value of the merged cell. Does anyone have an idea to fix this?