how to add 2 ranges

[kotharu]

how to add 2 ranges

 

[Patrick Molloy]

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

 

[kotharu]

Thank you