Please simplify code to change the range for a name.

[david killoran]

This code successfully changes the range for name "graphdata", but is this the simplest way to do it?
(I got it from running a macro.)
Also, how do I convert it from R1C1 to normal A1 format?

With ActiveWorkbook.Names("graphdata")
        .Name = "graphdata"
        .RefersToR1C1 = _
        "=OFFSET('20.00'!R113C147,COUNT('20.00'!C147),0,-'20.00'!R105C244-1,1)"
    End With

many thanks!