Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
tip: extending a range
Many people just use rows(n).Insert to extend a range
supposing you want ot extend teh range without the insert? Here's one way : Option Explicit Sub test() addRows Worksheets("sheet1").Range("myrange"), 2 End Sub Sub addRows(target As Range, howmany As Long) With target With .Resize(.Rows.Count + howmany) .Name = target.Name.Name End With End With End Sub you may want to add colr, borders etc... I hope this may help somebody - and it may give you ideas. Patrick |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Extending a range selection | Excel Programming | |||
Extending a range | Excel Discussion (Misc queries) | |||
Extending a range | Excel Programming | |||
Automatically extending a range | Excel Programming | |||
help extending formula to range | Excel Programming |