MAcro to name a range

[DebugGalpin]

Hi there,

I am wanting to name the dynamic range below as "ResultsRange"

Range("B2").Select
Range(Selection, Selection.Offset(Range("ReportRow") + 6, 0)).Select
Range(Selection, Selection.Offset(0, Range("ReportColumn") + 3)).Select

It is in Sheet ("Results"), I've been trying

Worksheets("Results").Range(Selection).Name = Range("ResultsRange").Value

But failing

Any ideas?

Thanks
DAVE

 

[Richard Schollar]

Try:

Range("B2").Resize(Range("ReportRow")+7,Range("ReportColumn")+4).Name = _
  "ResultsRange"