Copying text as a formula?
I have been able to automate composition of formulas, by concatenation and
other methods, as text strings. '=RC[-1] is a typical result. I am trying to copy this resulting in a usable formula without success. I have developed the following: Sub Macro1() '('=RC[-1] is previously entered in C1.) Dim myFormula As Range Dim myB1 As Range Set myFormula = Range("C1") Set myB1 = Range("B1") myB1.FormulaR1C1 = myFormula End Sub The result in B1 is =RC[-1], both in the cell and the formula bar, but it won't function as a formula until I manually click on the formula bar and peck Enter. I know I am missing something? Thanks in advance |
Copying text as a formula?
Hi
try changing the line myB1.FormulaR1C1 = myFormula to myB1.FormulaR1C1 = myFormula.formulaR1C1 as you currently assign the VALUE to the formulaR1C1 property -----Original Message----- I have been able to automate composition of formulas, by concatenation and other methods, as text strings. '=RC[-1] is a typical result. I am trying to copy this resulting in a usable formula without success. I have developed the following: Sub Macro1() '('=RC[-1] is previously entered in C1.) Dim myFormula As Range Dim myB1 As Range Set myFormula = Range("C1") Set myB1 = Range("B1") myB1.FormulaR1C1 = myFormula End Sub The result in B1 is =RC[-1], both in the cell and the formula bar, but it won't function as a formula until I manually click on the formula bar and peck Enter. I know I am missing something? Thanks in advance . |
Bless you Frank!
It worked!
"Frank Kabel" wrote in message ... Hi try changing the line myB1.FormulaR1C1 = myFormula to myB1.FormulaR1C1 = myFormula.formulaR1C1 as you currently assign the VALUE to the formulaR1C1 property -----Original Message----- I have been able to automate composition of formulas, by concatenation and other methods, as text strings. '=RC[-1] is a typical result. I am trying to copy this resulting in a usable formula without success. I have developed the following: Sub Macro1() '('=RC[-1] is previously entered in C1.) Dim myFormula As Range Dim myB1 As Range Set myFormula = Range("C1") Set myB1 = Range("B1") myB1.FormulaR1C1 = myFormula End Sub The result in B1 is =RC[-1], both in the cell and the formula bar, but it won't function as a formula until I manually click on the formula bar and peck Enter. I know I am missing something? Thanks in advance . |
All times are GMT +1. The time now is 11:56 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com