Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Run Time Error 1004
Can anyone tell my what's wrong with the following:
lRaekke = ActiveCell.Row dVSLoen = Cells(lRaekke, 9).Value Debug.Print lRaekke, dVSLoen sTimeAdresse = Cells(lRaekke, 7).Address sEgenLoenAdresse = "Tilbudsoplysninger!" + Worksheets ("TilbudsOplysninger").Range("EgenLoen").Addres s '=+Hvis(EgenLoen0;+Timer*EgenLoen;V&S løn) sFormel = "=+Hvis(EgenLoen0;" + "+" + sTimeAdresse + "*" + "EgenLoen;" + "+" + CStr(dVSLoen) + ")" Debug.Print sFormel '=+Hvis(EgenLoen0;+$G$34*EgenLoen;+0) ActiveSheet.Cells(lRaekke, 9).Formula = sFormel It keeps failing at the last line: RT error 1004: Programdifined or Objectdifined Error Thanks Lars Kofod |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Run Time Error 1004
I don't speak this language, but when I have trouble fixing a formula that is
being populated by VBA, I do this: sFormel = "'=....." Then when I put it into the cell, it's just text. I go back to the worksheet and remove that leading quote and see what excel yells about. Also, I think I'd use & (ampersand) instead of + (Plus) to concatenate strings when you're building the formula. Lars Kofod wrote: Can anyone tell my what's wrong with the following: lRaekke = ActiveCell.Row dVSLoen = Cells(lRaekke, 9).Value Debug.Print lRaekke, dVSLoen sTimeAdresse = Cells(lRaekke, 7).Address sEgenLoenAdresse = "Tilbudsoplysninger!" + Worksheets ("TilbudsOplysninger").Range("EgenLoen").Addres s '=+Hvis(EgenLoen0;+Timer*EgenLoen;V&S løn) sFormel = "=+Hvis(EgenLoen0;" + "+" + sTimeAdresse + "*" + "EgenLoen;" + "+" + CStr(dVSLoen) + ")" Debug.Print sFormel '=+Hvis(EgenLoen0;+$G$34*EgenLoen;+0) ActiveSheet.Cells(lRaekke, 9).Formula = sFormel It keeps failing at the last line: RT error 1004: Programdifined or Objectdifined Error Thanks Lars Kofod -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Run-time error: '1004' | Excel Worksheet Functions | |||
Run-time error '1004': | Excel Discussion (Misc queries) | |||
Run Time error 1004 | Excel Discussion (Misc queries) | |||
Run time error 1004, General ODBC error | New Users to Excel | |||
Run time error 1004 | Excel Programming |