Sub Test() Dim Rng As Range Lrow = ActiveSheet.Range("A65536").End(xlUp).Row ' Last Row in Column A. Set Rng = ActiveSheet.Range("B1") ' Cell where you have the vlookup formula Rng.AutoFill Destination:=Range("B1" & ":B" & Trim(Str(Lrow))), Type:=xlFillDefault End Sub
On Tue, Jul 5, 2011 at 2:58 PM, Rash <rashmiv.ni...@gmail.com> wrote: > Hi All, > > I have excel file with 12000+ rows, and 10 column where i have used Vlookup > and sumif function in the second row, i need a macro which copy down the > function till the last row with min. time frame. > Appreciate your support in advance. > Regards > Rash > > -- > ---------------------------------------------------------------------------------- > Some important links for excel users: > 1. Follow us on TWITTER for tips tricks and links : > http://twitter.com/exceldailytip > 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > 3. Excel tutorials at http://www.excel-macros.blogspot.com > 4. Learn VBA Macros at http://www.quickvba.blogspot.com > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > > To post to this group, send email to excel-macros@googlegroups.com > > <><><><><><><><><><><><><><><><><><><><><><> > Like our page on facebook , Just follow below link > http://www.facebook.com/discussexcel > -- Regards Vasant skype Id: vasantjob vasant...@gmail.com -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel