ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   How to insert a complex formula in a cell with VBA (https://www.excelbanter.com/excel-worksheet-functions/8633-how-insert-complex-formula-cell-vba.html)

mircea

How to insert a complex formula in a cell with VBA
 
How to insert a formula in a cell with VBA
example : if formula is "=if(a3=2;a3;a2)"
i used
cells(2,3).Formula="=if(a3=2;a3;a2)"

bu i receive an error
Application object ....

if i used "=s4"
everything is ok.



Frank Kabel

Hi
try:
cells(2,3).Formula="=if(a3=2,a3,a2)"

--
Regards
Frank Kabel
Frankfurt, Germany
"mircea" schrieb im Newsbeitrag
...
How to insert a formula in a cell with VBA
example : if formula is "=if(a3=2;a3;a2)"
i used
cells(2,3).Formula="=if(a3=2;a3;a2)"

bu i receive an error
Application object ....

if i used "=s4"
everything is ok.





Peo Sjoblom

Use

Cells(2, 3).Formula = "=IF(a3=2,a3,a2)"


Regards,

Peo Sjoblom

"mircea" wrote:

How to insert a formula in a cell with VBA
example : if formula is "=if(a3=2;a3;a2)"
i used
cells(2,3).Formula="=if(a3=2;a3;a2)"

bu i receive an error
Application object ....

if i used "=s4"
everything is ok.




mircea

thanks a lot !



Dana DeLouis

Just a technique would be to place the equation into a cell manually just to
have Excel take a look at it.
If Excel doesn't complain, then copy the formula back into the macro. In a
more complicated statement, Excel might correct any missing '( ' or ')' .
Excel will correct any small letters like 'if' and 'a1' to the proper case
if all checks out.

Cells(2, 3).Formula = "=IF(A3=2,A3,A2)"

Again, just a technique.
--
Dana DeLouis
Win XP & Office 2003


"mircea" wrote in message
...
How to insert a formula in a cell with VBA
example : if formula is "=if(a3=2;a3;a2)"
i used
cells(2,3).Formula="=if(a3=2;a3;a2)"

bu i receive an error
Application object ....

if i used "=s4"
everything is ok.





Ken

Something I just learned - you can use a more "direct" code to do this using
"Iif."

Cells(2, 3) = IIf(Cells(3, 1) = 2, Cells(3, 1), Cells(2, 1))


"mircea" wrote:

How to insert a formula in a cell with VBA
example : if formula is "=if(a3=2;a3;a2)"
i used
cells(2,3).Formula="=if(a3=2;a3;a2)"

bu i receive an error
Application object ....

if i used "=s4"
everything is ok.




mircea

thanks again to all of you !
Very helpfull newsgroup.




All times are GMT +1. The time now is 04:49 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com