Use vba to fill in matrix in excel.

I have a matrix format in excel that i need to fill in with a formula.
I was wondering if there was any vba code that could help me with this.
Example,

Policy Number Name Date

429438
975288
759284

I am going to be using a lookup function to fill in name and date, I
was hoping to get code that evaluates the # of fields and rows first
then copies in the encompassing cells. Thanks for the help.

set rng = Range(Cells(2,1),Cells(2,1).End(xldown))
rng.offset(0,1).Formula = "=Vlookup(A2,Sheet2!$A$1:$C4200,2,False))"
rng.offset(0,2).Formula = "=Vlookup(A2,Sheet2!$A$1:$C4200,3,False))"

--
Regards,
Tom Ogilvy



<jon.ingram@comcast.net> wrote in message
news:1139771388.393556.287600@g47g2000cwa.googlegroups.com...
> I have a matrix format in excel that i need to fill in with a formula.
> I was wondering if there was any vba code that could help me with this.
> Example,
>
> Policy Number Name Date
>
> 429438
> 975288
> 759284
>
> I am going to be using a lookup function to fill in name and date, I
> was hoping to get code that evaluates the # of fields and rows first
> then copies in the encompassing cells. Thanks for the help.
>

Got an extra ")" in there and a 4 instead of a $

set rng = Range(Cells(2,1),Cells(2,1).End(xldown))
rng.offset(0,1).Formula = "=Vlookup(A2,Sheet2!$A$1:$C$200,2,False)"
rng.offset(0,2).Formula = "=Vlookup(A2,Sheet2!$A$1:$C$200,3,False)"

--
Regards,
Tom Ogivly

"Tom Ogilvy" <twogilvy@msn.com> wrote in message
news:%23Bq1kjBMGHA.140@TK2MSFTNGP12.phx.gbl...
> set rng = Range(Cells(2,1),Cells(2,1).End(xldown))
> rng.offset(0,1).Formula = "=Vlookup(A2,Sheet2!$A$1:$C4200,2,False))"
> rng.offset(0,2).Formula = "=Vlookup(A2,Sheet2!$A$1:$C4200,3,False))"
>
> --
> Regards,
> Tom Ogilvy
>
>
>
> <jon.ingram@comcast.net> wrote in message
> news:1139771388.393556.287600@g47g2000cwa.googlegroups.com...
> > I have a matrix format in excel that i need to fill in with a formula.
> > I was wondering if there was any vba code that could help me with this.
> > Example,
> >
> > Policy Number Name Date
> >
> > 429438
> > 975288
> > 759284
> >
> > I am going to be using a lookup function to fill in name and date, I
> > was hoping to get code that evaluates the # of fields and rows first
> > then copies in the encompassing cells. Thanks for the help.
> >
>
>