cell reference in formula
Hi Gogo,
Try this For a = 2 To 18 Range("B" & a).FormulaR1C1 = "=sheet1!R[" & (a - 1) * 2 & "]C" Next a -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "gogo" wrote in message ... hi here is what's troubles me. the code below doesn't work but it helps you understand. i want that cell in (sheet2,B2) have a value of cell in (sheet1,B2), cell in (sheet2,B3) have a value of cell in (sheet1,B4) ... and so. the pattern is: columns are same but rows in sheet2 are continues, and in sheet2 goes by even numbers - 2,4,6,8... For a = 2 To 18 // a =number of row in sheet2 i = (a - 1) * 2 // i =even number sequence[i] Range("B" & a).Select ActiveCell.FormulaR1C1 = "=sheet1!RC" // here is question: how to reference a variable index "i" Next a tnx in advance |
cell reference in formula
a =
tnx Bob for help with "=sheet1!R[" & (a - 1) * 2 & "]C". this helped a lo rearraged my macro and this do the work d1 = d2 = k = D Range("B" & (a + d1 + 1)).Selec ActiveCell.FormulaR1C1 = "=Original!R[" & (a + d2) - k & "]C k = k + d1 = d1 + d2 = d2 + Loop Until (d2 34) |
cell reference in formula
Good, a win-win.
Bob "gogo" wrote in message ... a = 0 tnx Bob for help with "=sheet1!R[" & (a - 1) * 2 & "]C". this helped a lot rearraged my macro and this do the work. d1 = 1 d2 = 2 k = 2 Do Range("B" & (a + d1 + 1)).Select ActiveCell.FormulaR1C1 = "=Original!R[" & (a + d2) - k & "]C" k = k + 1 d1 = d1 + 1 d2 = d2 + 2 Loop Until (d2 34) |
All times are GMT +1. The time now is 12:01 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com