Dim target As Range, source1 As Range, source2 As Range

Set source1 = Sheet1.Range("A1:G5")
Set source2 = Sheet1.Range("K1:L5")


Set target = Union(source1, source1)


Patrick Molloy
Microsoft Excel MVP

-----Original Message-----

how to add 2 ranges


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from
http://www.ExcelForum.com/

.