Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter formula by code.
Hi All
can anyone help. I cant seem to get this to work. I keep getting run time error 1004 application or object defined error. Public Sub TLIdentify() finalrow = Worksheets("INV Bookings").Range("B65536").End(xlUp).Row Worksheets("INV Bookings").Range("AV26:AV" & finalrow).FormulaR1C1 = "=IF(OR(RC[-38]0,RC[-32]0,RC[-26]0,RC[-20]0,RC[-14]0,RC[-8]0,RC[-2]0),VLOOKUP(RC4,'Team Summary'!R4C3:R16C4,2,0),"")" End Sub -- Regards and Thanks for any assistance. Francis Brown. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter formula by code.
On Sun, 21 Feb 2010 10:45:01 -0800, Francis Brown
wrote: Hi All can anyone help. I cant seem to get this to work. I keep getting run time error 1004 application or object defined error. Public Sub TLIdentify() finalrow = Worksheets("INV Bookings").Range("B65536").End(xlUp).Row Worksheets("INV Bookings").Range("AV26:AV" & finalrow).FormulaR1C1 = "=IF(OR(RC[-38]0,RC[-32]0,RC[-26]0,RC[-20]0,RC[-14]0,RC[-8]0,RC[-2]0),VLOOKUP(RC4,'Team Summary'!R4C3:R16C4,2,0),"")" End Sub You have to double your "s in the end of the IF statement. As the formula is inside a long string a single " will be interpreted as the end of this string rather than a " that is to be part of the formula. Change you formula like this: ......R16C4,2,0),"""")" and say good bye to the error 1004 :-) Hope this helps / Lars-Åke |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
NOT ABLE TO ENTER VB CODE | Excel Programming | |||
What does hitting Ctrl + Shift + Enter to enter a formula do??? Help a n00b out. | Excel Worksheet Functions | |||
ALT + enter or Char(13) in code | Excel Discussion (Misc queries) | |||
Enter VBA Code Password | Excel Programming | |||
Code to enter formula w/ relative row ref? | Excel Programming |