macro to merge cell

[nshanmugaraj]

hi

i need to merge cells on a button click

pls help

[Nigel]

Range("A1:B1").MergeCells = True

'or... which allows you to reference cells by numerical value (say in a
loop)

Range(Cells(1, 1), Cells(1, 2)).MergeCells = True


Use MergeCells = False to reverse the settings

--
Cheers
Nigel



"nshanmugaraj" <[email protected]>
wrote in message
news:[email protected]...
>
> hi
>
> i need to merge cells on a button click
>
> pls help
>
>
> --
> nshanmugaraj
> ------------------------------------------------------------------------
> nshanmugaraj's Profile:
http://www.excelforum.com/member.php...o&userid=31570
> View this thread: http://www.excelforum.com/showthread...hreadid=518943
>

[Nigel]

This may be useful to toggle the range between merge and unmerged using
control button on the sheet

Private Sub CommandButton1_Click()
If CommandButton1.Caption <> "Unmerge" Then
CommandButton1.Caption = "Unmerge"
Range("A1:B1").MergeCells = True
Else
CommandButton1.Caption = "Merge"
Range("A1:B1").MergeCells = False
End If
End Sub

--
Cheers
Nigel



"nshanmugaraj" <[email protected]>
wrote in message
news:[email protected]...
>
> hi
>
> i need to merge cells on a button click
>
> pls help
>
>
> --
> nshanmugaraj
> ------------------------------------------------------------------------
> nshanmugaraj's Profile:
http://www.excelforum.com/member.php...o&userid=31570
> View this thread: http://www.excelforum.com/showthread...hreadid=518943
>