Determine start column/ end column of Merged Cell

[jC!]

hi all,

any advise on how to determine the start Column and end Column of a
merged Cell using VBA in Excel 2003 is mostly appreciated.

ie A3/B3/C3/D3/E3/F3 are merged therefore
Start = 1 (for A)
End = 6 (for F)

thanking for your help.

cheers...

....jurgenC!

 

[papou]

Hi JurgenC!
Dim MergeAr As Range
Set MergeAr = Range("C10").MergeArea
MsgBox MergeAr.Column & vbCrLf & MergeAr.Column + MergeAr.Columns.Count

HTH
Cordially
Pascal

 

[papou]

please amend:
Set MergeAr = Range("A3").MergeArea

Cordially
Pascal

 

[jurgen C]

Hi Pascal,

thanks for your response and help

cheers...

...jC!



*** Sent via Devdex http://www.devdex.com ***
Don't just participate in USENET...get rewarded for it!