About Us

Don Guillett

Thanks

--
Don Guillett
SalesAid Software

"JLGWhiz" wrote in message
...
Don, he wanted the first empty in row 3, so instead of:

LR=cells(1,"b").end(down).row+1

Try this:

LC = Cells(3,1).End(xlToRight).Column + 1
Cells(3, LC) .FormulaR1C1 = "=SUM(R[1]C[-2]:R[65535]C[-2])"

"Don Guillett" wrote:

LR=cells(1,"b").end(down).row+1
or you may like this better
LR=cells(rows.count,"b").end(up).row+1

Range("B" & lr).FormulaR1C1 = "=SUM(R[1]C[-2]:R[65535]C[-2])"

--
Don Guillett
SalesAid Software

"timmulla" wrote in message
...
Can anyone help me with code that can put a formula in the first empty
cell
in a row? Basically, I want to replace the B3 in the following formula
so
that it will put the formula in the first empty cell in row 3. I'm
trying
to
make the following formula dynamic.

Range("B3").FormulaR1C1 = "=SUM(R[1]C[-2]:R[65535]C[-2])"

any help would be appreciated.

--
Regards,

timmulla

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How can I assign a value to a cell without putting a formula in it	WFariss	Excel Worksheet Functions	4	February 17th 10 01:10 PM
Error putting a formula in a cell with vba	cristizet	Excel Programming	4	April 22nd 07 02:11 PM
putting a string from one cell in the formula of another -- indirect needed?	[email protected]	Excel Worksheet Functions	3	January 23rd 06 07:55 PM
Putting Formula in Cell	bw	Excel Programming	2	November 2nd 05 11:23 AM
Putting Array Formula into each Cell in a Selection (that doesn'ttake eons!)	Dave Peterson[_3_]	Excel Programming	1	April 1st 04 09:34 AM