Right now, I have the following line of code in a macro:

Range("B6:B129").FormulaR1C1 = _
"=YEAR(RC[-1])&TEXT(MONTH(RC[-1]),""00"")&TEXT(DAY(RC[-1]),""00"")"

Now I want to generalize the reference to select, starting in cell B6, a
range that is X rows long and Y rows wide (X and Y determined elsewhere).

How to I change this code? Thanks, John

Range("B6").Resize(numRows, numCols).FormulaR1C1 = ....

Tim


On Nov 23, 5:50*pm, John V wrote:
Right now, I have the following line of code in a macro:

Range("B6:B129").FormulaR1C1 = _
* * * * "=YEAR(RC[-1])&TEXT(MONTH(RC[-1]),""00"")&TEXT(DAY(RC[-1]),""00"")"

Now I want to generalize the reference to select, starting in cell B6, a
range that is X rows long and Y rows wide (X and Y determined elsewhere).

How to I change this code? Thanks, John

As the saying goes, it's simple if you know how, impossible if you don't.

Thanks very much, John

I'm not sure if the last post went through, so will repost

Dim myRange as Excel.Range

Set myRange = Range("B6").Resize(X,Y) 'assumes that X and Y are defined

myRange.FormulaR1C1 = _
"=TEXT(RC[-1]),""yyyymmdd"")"

I'm thinking your formula may change if you resize the range, but this
answers the question that was asked.
--
HTH,

Barb Reinhardt



"John V" wrote:

Right now, I have the following line of code in a macro:

Range("B6:B129").FormulaR1C1 = _
"=YEAR(RC[-1])&TEXT(MONTH(RC[-1]),""00"")&TEXT(DAY(RC[-1]),""00"")"

Now I want to generalize the reference to select, starting in cell B6, a
range that is X rows long and Y rows wide (X and Y determined elsewhere).

How to I change this code? Thanks, John