|
|
hi,
i m having problem while merge cell to allready a merged cell.
Sub selectingmergedcell()
For i = 2 To Range("IV" & 6).End(xlToLeft).Column If Not Cells(6, i).Value = "" Then
For j = 2 To Range("IV" & 7).End(xlToLeft).Column
If Cells(7, j).Value = "Oct'08" Then
For k = i To j
Cells(6, k).Merge
Next
End If
Next j
End If
Next i
End Sub
above code is not working.....help me its urgent.
thanks and regards, Dheeran
|
|
Hi Dheeran,
the code you've posted is Excel code.
This group is for Word tables.
Try an Excel group.
--
Greetings from Bavaria, Germany
Helmut Weber, MVP WordVBA
Vista Small Business, Office XP
|
|
|