Re: SHARE VALUE IN MERGED CELLS.

[CMM Room <cmmroom@DDRE.DETROITDIESEL.COM>]

How about a custom function. I think this will work, although I haven't
thoroughly tested it yet. Just insert the following function into a regular
module ,then in a cell, type =Value4MergedCells(B1). HTH.

Function Value4MergedCells(rng As Range) As Variant
If Range(rng.Address).MergeCells = True Then
    Value4MergedCells = Range(rng.Address).MergeArea.Resize(1, 1)
Else
    Value4MergedCells = "Not Merged"
End If
End Function





                                        Howard Groves
                                        cmmroom@ddre.detroitdiesel.com

> -----Original Message-----
> From: J. Meng [SMTP:jmeng81@HOTMAIL.COM]
> Sent: Friday, July 25, 2003 8:59 AM
> To:   EXCEL-G@PEACH.EASE.LSOFT.COM
> Subject:      SHARE VALUE IN MERGED CELLS.
>
> If I merge cells, say  A1:C1, then the value in B1, C1 will be lost. The
> value shown in the merged
> cells can only be refered by A1.  Is it possible when I refer B1 or C1, I
> can get the same value?
>
>
> thanks.
>
> Jerry
>
> _________________________________________________________________
> Tired of spam? Get advanced junk mail protection with MSN 8.
> http://join.msn.com/?page=features/junkmail
>
> --------------------------------------------------------------------------
> The EXCEL-G list is hosted on a Windows NT(TM) machine running L-Soft
> international's LISTSERV(R) software.  For subscription/signoff info
> and archives, see http://peach.ease.lsoft.com/archives/excel-g.html .
>                              COPYRIGHT INFO:
> http://peach.ease.lsoft.com/scripts/wa.exe?SHOWTPL=COPYRIGHT&L=EXCEL-G

--------------------------------------------------------------------------
The EXCEL-G list is hosted on a Windows NT(TM) machine running L-Soft
international's LISTSERV(R) software.  For subscription/signoff info
and archives, see http://peach.ease.lsoft.com/archives/excel-g.html .
                             COPYRIGHT INFO:
http://peach.ease.lsoft.com/scripts/wa.exe?SHOWTPL=COPYRIGHT&L=EXCEL-G