Is there a built-in function to combine 2 ranges?

[Nick Hebb]

Before you answer Union(), read on...

I need a function to combine 2 ranges that return 1 range encompassing
both.

Given,
range1 = "A110"
range2 = "C5:F23"

Union(range1, range2) would return "A110,C5:F23", but I want
something that returns "A1:F23".

I could probably write something in a few minutes, but I prefer built-
in functions where possible.

Thanks,

Nick Hebb
BreezeTree Software
http://www.breezetree.com

 

[Jim Thomlinson]

Range takes 2 arguments so something like this perhaps...

Dim rng As Range

Set rng = Range(Range("A110"), Range("C5:F23"))
MsgBox rng.Address

 

[Nick Hebb]

Thanks Jim -

Nice simple solution. I thought I needed to break apart the
constituent components (min row, max row, min column, max column) to
feed into Range. I'd be embarrassed to show the convoluted code I came
up with!

Thanks,

Nick Hebb
BreezeTree Software
http://www.breezetree.com

 

[Jim Thomlinson]

One day we can compare embarassing code. I promise you it will be quite a
contest...

 

[Alan Beban]

Not sure what you mean by "built-in functions" in this context, but how
about

Set rng3 = Range(rng1(1, 1), rng2(rng2.Rows.Count, rng2.Columns.Count))

Alan Beban