ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Error 1004: application or object defined error (https://www.excelbanter.com/excel-programming/427102-error-1004-application-object-defined-error.html)

jodleren

Error 1004: application or object defined error
 
Hi

I upload a bunch of information to a sheet, including simple formulas
like =A1/A2 etc.

There is one IF, and that causes the error:

Worksheets("Start").Cells(j, 6) = "=if(B7=0;E" & sLine & ";E" &
sLine & "/B7)"

I have tried Worksheets("Start").Cells(j, 6).Formula but that does not
change much
If I remove the equals (=) sign, then it works, and I can add it
afterwards manually, and it will work. The formula is correct, I just
can set it.

I even added a DoEvents before - no change.

What do I do wrong here?
I browsed the group, but did not find anything on this specific case.

WBR
Sonnich

Jacob Skaria

Error 1004: application or object defined error
 
Worksheets("Start").Cells(j, 6).Formula = "=if(B7=0;E" & sLine & ";E" &
sLine & "/B7)"

--
If this post helps click Yes
---------------
Jacob Skaria


"jodleren" wrote:

Hi

I upload a bunch of information to a sheet, including simple formulas
like =A1/A2 etc.

There is one IF, and that causes the error:

Worksheets("Start").Cells(j, 6) = "=if(B7=0;E" & sLine & ";E" &
sLine & "/B7)"

I have tried Worksheets("Start").Cells(j, 6).Formula but that does not
change much
If I remove the equals (=) sign, then it works, and I can add it
afterwards manually, and it will work. The formula is correct, I just
can set it.

I even added a DoEvents before - no change.

What do I do wrong here?
I browsed the group, but did not find anything on this specific case.

WBR
Sonnich


FSt1

Error 1004: application or object defined error
 
hi
if i am reading correctly, your formula seems to have simi colons instead of
commas. try this.
Worksheets("sheet1").Cells(6, "j") = "=if(B7=0,E" & sLine & ",E" & sLine &
"/B7)"

regards
FSt1

"jodleren" wrote:

Hi

I upload a bunch of information to a sheet, including simple formulas
like =A1/A2 etc.

There is one IF, and that causes the error:

Worksheets("Start").Cells(j, 6) = "=if(B7=0;E" & sLine & ";E" &
sLine & "/B7)"

I have tried Worksheets("Start").Cells(j, 6).Formula but that does not
change much
If I remove the equals (=) sign, then it works, and I can add it
afterwards manually, and it will work. The formula is correct, I just
can set it.

I even added a DoEvents before - no change.

What do I do wrong here?
I browsed the group, but did not find anything on this specific case.

WBR
Sonnich


Jacob Skaria

Error 1004: application or object defined error
 
Oops...Review your formula closely to identify the semicolons . It should be
commas

--
If this post helps click Yes
---------------
Jacob Skaria


"Jacob Skaria" wrote:

Worksheets("Start").Cells(j, 6).Formula = "=if(B7=0;E" & sLine & ";E" &
sLine & "/B7)"

--
If this post helps click Yes
---------------
Jacob Skaria


"jodleren" wrote:

Hi

I upload a bunch of information to a sheet, including simple formulas
like =A1/A2 etc.

There is one IF, and that causes the error:

Worksheets("Start").Cells(j, 6) = "=if(B7=0;E" & sLine & ";E" &
sLine & "/B7)"

I have tried Worksheets("Start").Cells(j, 6).Formula but that does not
change much
If I remove the equals (=) sign, then it works, and I can add it
afterwards manually, and it will work. The formula is correct, I just
can set it.

I even added a DoEvents before - no change.

What do I do wrong here?
I browsed the group, but did not find anything on this specific case.

WBR
Sonnich


jodleren

Error 1004: application or object defined error
 
On Apr 17, 7:12*pm, FSt1 wrote:
hi
if i am reading correctly, your formula seems to have simi colons instead of
commas. try this.
Worksheets("sheet1").Cells(6, "j") = "=if(B7=0,E" & sLine & ",E" & sLine &
"/B7)"

regards
FSt1

"jodleren" wrote:
Hi


I upload a bunch of information to a sheet, including simple formulas
like =A1/A2 etc.


There is one IF, and that causes the error:


* * Worksheets("Start").Cells(j, 6) = "=if(B7=0;E" & sLine & ";E" &
sLine & "/B7)"


I have tried Worksheets("Start").Cells(j, 6).Formula but that does not
change much
If I remove the equals (=) sign, then it works, and I can add it
afterwards manually, and it will work. The formula is correct, I just
can set it.


I even added a DoEvents before - no change.


What do I do wrong here?
I browsed the group, but did not find anything on this specific case.


WBR
Sonnich


That was it.
God, I could not see the forest, there were some trees in front of it.

WBR & thanks
Sonnich


All times are GMT +1. The time now is 05:12 PM.

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