Repost: Copy and Offset cell reference

  • Thread starter Thread starter CJ
  • Start date Start date
C

CJ

Hi Groupies:

I posted this a couple of days ago, but I missed the functions group, no
reply yet.

I was asked if this was possible and I can not think of how, hopefully,
somebody can help me.

On Sheet 2, I have the following data:

cell B2 =sheet1$N$14
cell B3 =sheet1$N$32

On sheet 3, I need to have

cell B2 =sheet1$N$15
cell B3 =sheet1$N$33

On sheet 4, I need to have

cell B2 =sheet1$N$16
cell B3 =sheet1$N$34

Basically, each sheet is a different month and the references need to
be offset each time. This needs to be done a number of times in this
and other workbooks.

Is there an efficient way to do this?
 
Sub formulaforshts()
'cell B2 =sheet1$N$14

For i = 1 To 3
Sheets(i).Range("b2").Formula = "=sheet1!n" & i + 13
Sheets(i).Range("b3").Formula = "=sheet1!n" & i + 31
Next i
End Sub
 
Back
Top