| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
How do I edit this macro?
The value of L1 is the row number. I am copying info from vertical to a new
sheet that is horizontal like a database list. This macro is not working an I need help. Thanks in advance. ActiveCell.FormulaR1C1 = "=Sheet1!R[-1]C[1]" Range("B(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!RC" Range("C(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("D(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("F(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("G(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("H(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("I(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("J(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[10]C[-8]" Range("A3").Select |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
How do I edit this macro?
Range"A11").FormulaR1C1 = "=Sheet1!R[-1]C[1]"
Range("Bl1)").FormulaR1C1 = "=Sheet1!RC" Range("Cl1").FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("Dl1").FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E11").FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("Fl1").FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("Gl1").FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("Hl1").FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("Il1").FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("Jl1").FormulaR1C1 = "=Sheet1!R[10]C[-8]" -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Mallers" wrote in message ... The value of L1 is the row number. I am copying info from vertical to a new sheet that is horizontal like a database list. This macro is not working an I need help. Thanks in advance. ActiveCell.FormulaR1C1 = "=Sheet1!R[-1]C[1]" Range("B(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!RC" Range("C(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("D(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("F(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("G(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("H(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("I(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("J(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[10]C[-8]" Range("A3").Select |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
How do I edit this macro?
Just a typo alert:
Range("A11").FormulaR1C1 = "=sheet1!R[-1]C[1]" Range("B11").FormulaR1C1 = "=sheet1!RC" Range("C11").FormulaR1C1 = "=sheet1!R[3]C[-1]" Range("D11").FormulaR1C1 = "=sheet1!R[4]C[-2]" Range("E11").FormulaR1C1 = "=sheet1!R[5]C[-3]" Range("F11").FormulaR1C1 = "=sheet1!R[6]C[-4]" Range("G11").FormulaR1C1 = "=sheet1!R[7]C[-5]" Range("H11").FormulaR1C1 = "=sheet1!R[8]C[-6]" Range("I11").FormulaR1C1 = "=sheet1!R[9]C[-7]" Range("J11").FormulaR1C1 = "=sheet1!R[10]C[-8]" And to the OP: You have a mixture of 11 and l1 (one-one's and ell-one's) in those addresses. You'll want to be more careful with which you want: BL1 or B11??? Bob Phillips wrote: Range"A11").FormulaR1C1 = "=Sheet1!R[-1]C[1]" Range("Bl1)").FormulaR1C1 = "=Sheet1!RC" Range("Cl1").FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("Dl1").FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E11").FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("Fl1").FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("Gl1").FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("Hl1").FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("Il1").FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("Jl1").FormulaR1C1 = "=Sheet1!R[10]C[-8]" -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Mallers" wrote in message ... The value of L1 is the row number. I am copying info from vertical to a new sheet that is horizontal like a database list. This macro is not working an I need help. Thanks in advance. ActiveCell.FormulaR1C1 = "=Sheet1!R[-1]C[1]" Range("B(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!RC" Range("C(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("D(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("F(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("G(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("H(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("I(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("J(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[10]C[-8]" Range("A3").Select -- Dave Peterson |
|
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
How do I edit this macro?
Thanks Dave, I didn't spot that l1 11 differentation, and must admit to not
undesrtanding the OPs point about L1, so in the lightt of your observation I think he must mean Range("A" & L1).FormulaR1C1 = "=sheet1!R[-1]C[1]" Range("B" & L1).FormulaR1C1 = "=sheet1!RC" Range("C" & L1).FormulaR1C1 = "=sheet1!R[3]C[-1]" Range("D" & L1).FormulaR1C1 = "=sheet1!R[4]C[-2]" Range("E" & L1).FormulaR1C1 = "=sheet1!R[5]C[-3]" Range("F" & L1).FormulaR1C1 = "=sheet1!R[6]C[-4]" Range("G" & L1).FormulaR1C1 = "=sheet1!R[7]C[-5]" Range("H" & L1).FormulaR1C1 = "=sheet1!R[8]C[-6]" Range("I" & L1).FormulaR1C1 = "=sheet1!R[9]C[-7]" Range("J" & L1).FormulaR1C1 = "=sheet1!R[10]C[-8]" -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Dave Peterson" wrote in message ... Just a typo alert: Range("A11").FormulaR1C1 = "=sheet1!R[-1]C[1]" Range("B11").FormulaR1C1 = "=sheet1!RC" Range("C11").FormulaR1C1 = "=sheet1!R[3]C[-1]" Range("D11").FormulaR1C1 = "=sheet1!R[4]C[-2]" Range("E11").FormulaR1C1 = "=sheet1!R[5]C[-3]" Range("F11").FormulaR1C1 = "=sheet1!R[6]C[-4]" Range("G11").FormulaR1C1 = "=sheet1!R[7]C[-5]" Range("H11").FormulaR1C1 = "=sheet1!R[8]C[-6]" Range("I11").FormulaR1C1 = "=sheet1!R[9]C[-7]" Range("J11").FormulaR1C1 = "=sheet1!R[10]C[-8]" And to the OP: You have a mixture of 11 and l1 (one-one's and ell-one's) in those addresses. You'll want to be more careful with which you want: BL1 or B11??? Bob Phillips wrote: Range"A11").FormulaR1C1 = "=Sheet1!R[-1]C[1]" Range("Bl1)").FormulaR1C1 = "=Sheet1!RC" Range("Cl1").FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("Dl1").FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E11").FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("Fl1").FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("Gl1").FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("Hl1").FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("Il1").FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("Jl1").FormulaR1C1 = "=Sheet1!R[10]C[-8]" -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Mallers" wrote in message ... The value of L1 is the row number. I am copying info from vertical to a new sheet that is horizontal like a database list. This macro is not working an I need help. Thanks in advance. ActiveCell.FormulaR1C1 = "=Sheet1!R[-1]C[1]" Range("B(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!RC" Range("C(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("D(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("F(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("G(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("H(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("I(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("J(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[10]C[-8]" Range("A3").Select -- Dave Peterson |
|
#5
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
How do I edit this macro?
Ahhhh.
I didn't read the original post. (I usually can get enough info from the reply--not always, obviously!) I think you got it! Bob Phillips wrote: Thanks Dave, I didn't spot that l1 11 differentation, and must admit to not undesrtanding the OPs point about L1, so in the lightt of your observation I think he must mean Range("A" & L1).FormulaR1C1 = "=sheet1!R[-1]C[1]" Range("B" & L1).FormulaR1C1 = "=sheet1!RC" Range("C" & L1).FormulaR1C1 = "=sheet1!R[3]C[-1]" Range("D" & L1).FormulaR1C1 = "=sheet1!R[4]C[-2]" Range("E" & L1).FormulaR1C1 = "=sheet1!R[5]C[-3]" Range("F" & L1).FormulaR1C1 = "=sheet1!R[6]C[-4]" Range("G" & L1).FormulaR1C1 = "=sheet1!R[7]C[-5]" Range("H" & L1).FormulaR1C1 = "=sheet1!R[8]C[-6]" Range("I" & L1).FormulaR1C1 = "=sheet1!R[9]C[-7]" Range("J" & L1).FormulaR1C1 = "=sheet1!R[10]C[-8]" -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Dave Peterson" wrote in message ... Just a typo alert: Range("A11").FormulaR1C1 = "=sheet1!R[-1]C[1]" Range("B11").FormulaR1C1 = "=sheet1!RC" Range("C11").FormulaR1C1 = "=sheet1!R[3]C[-1]" Range("D11").FormulaR1C1 = "=sheet1!R[4]C[-2]" Range("E11").FormulaR1C1 = "=sheet1!R[5]C[-3]" Range("F11").FormulaR1C1 = "=sheet1!R[6]C[-4]" Range("G11").FormulaR1C1 = "=sheet1!R[7]C[-5]" Range("H11").FormulaR1C1 = "=sheet1!R[8]C[-6]" Range("I11").FormulaR1C1 = "=sheet1!R[9]C[-7]" Range("J11").FormulaR1C1 = "=sheet1!R[10]C[-8]" And to the OP: You have a mixture of 11 and l1 (one-one's and ell-one's) in those addresses. You'll want to be more careful with which you want: BL1 or B11??? Bob Phillips wrote: Range"A11").FormulaR1C1 = "=Sheet1!R[-1]C[1]" Range("Bl1)").FormulaR1C1 = "=Sheet1!RC" Range("Cl1").FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("Dl1").FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E11").FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("Fl1").FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("Gl1").FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("Hl1").FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("Il1").FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("Jl1").FormulaR1C1 = "=Sheet1!R[10]C[-8]" -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Mallers" wrote in message ... The value of L1 is the row number. I am copying info from vertical to a new sheet that is horizontal like a database list. This macro is not working an I need help. Thanks in advance. ActiveCell.FormulaR1C1 = "=Sheet1!R[-1]C[1]" Range("B(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!RC" Range("C(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[3]C[-1]" Range("D(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[4]C[-2]" Range("E(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[5]C[-3]" Range("F(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[6]C[-4]" Range("G(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[7]C[-5]" Range("H(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[8]C[-6]" Range("I(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[9]C[-7]" Range("J(l1)").Select ActiveCell.FormulaR1C1 = "=Sheet1!R[10]C[-8]" Range("A3").Select -- Dave Peterson -- Dave Peterson |
|
#6
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
How do I edit this macro?
"Dave Peterson" wrote in message ... Ahhhh. I didn't read the original post. (I usually can get enough info from the reply--not always, obviously!) I think you got it! We got it! |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Edit Macro 1st time use | Excel Discussion (Misc queries) | |||
| Rookie at linking - need a tudor!!! | Excel Worksheet Functions | |||
| Macro Help In Excel | Excel Discussion (Misc queries) | |||
| How can I edit cell contents with a macro in Excel? | Excel Discussion (Misc queries) | |||
| Playing a macro from another workbook | Excel Discussion (Misc queries) | |||
Linear Mode
