Re: Enter formula and fill down

Tech-Archive recommends: Repair Windows Errors & Optimize Windows Performance

Thanks Bernie. I had tried a similiar code, but it keep hanging up at the
formula. Works perfect!

"Bernie Deitrick" wrote:

> Josh,
>
> Range("O2:O" & Range("G65536").End(xlUp).Row).FormulaR1C1 = _
> "=IF(RC[-8]>0,SUM(RC[-7]:RC[-1]),"" "")"
>
> This will extend down column O to match the values in column G.
>
> HTH,
> Bernie
> MS Excel MVP
>
>
> "Josh O." <JoshO@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
> news:9702D2B1-EE8A-4D18-A816-6F64144EBD93@xxxxxxxxxxxxxxxx
> > Thanks Bernie.
> >
> > How about the same thing with a different formula put into column "o"?
> > =if(g2>0,sum(h2:n2)," ")
> >
> > "Bernie Deitrick" wrote:
> >
> > > Josh,
> > >
> > > Range("E2:E" & Range("D65536").End(xlUp).Row).FormulaR1C1 = _
> > > "=IF(RC[-1]>0,TODAY()-(RC[-1]+30),"" "")"
> > >
> > > HTH,
> > > Bernie
> > > MS Excel MVP
> > >
> > >
> > > "Josh O." <JoshO@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
> > > news:EA52B525-5767-4F9D-B7DF-57682ADA8391@xxxxxxxxxxxxxxxx
> > > > How can I enter a formula into cell E2 and then fill the formula down
> to
> > > the
> > > > last row with data on the sheet.
> > > >
> > > > For example:
> > > > enter into E2: =IF(D2>0,TODAY()-(D2+30)," ")
> > > > Fill into E3: =IF(D3>0,TODAY()-(D3+30)," ")
> > > > ...Fill to last Row on sheet with data in column D.
> > >
> > >
> > >
>
>
>
.

Relevant Pages