Autofill until blank cell is reached

[uberathlete]

Hi all! I've got Sheet 1 (see attached). Let's say I've got a formula (assume a VLOOKUP formula) in B2 and I want to autofill down to the other cells in the B column until a blank column is reached in the A column. Does anyone know how I can make a macro for this? Any help would be greatly appreciated. Thanks!

[Bob Phillips]

Range("B2").Autofill Range("B2").Resize(Range("B2").End(xlDown).Row-1)

--

HTH

RP
(remove nothere from the email address if mailing direct)


"uberathlete" <[email protected]>
wrote in message
news:[email protected]...
>
> Hi all! I've got Sheet 1 (see attached). Let's say I've got a formula
> (assume a VLOOKUP formula) in B2 and I want to autofill down to the
> other cells in the B column until a blank column is reached in the A
> column. Does anyone know how I can make a macro for this? Any help
> would be greatly appreciated. Thanks!
>
>
> +-------------------------------------------------------------------+
> |Filename: Sheet1.JPG |
> |Download: http://www.excelforum.com/attachment.php?postid=3994 |
> +-------------------------------------------------------------------+
>
> --
> uberathlete
> ------------------------------------------------------------------------
> uberathlete's Profile:
http://www.excelforum.com/member.php...o&userid=28388
> View this thread: http://www.excelforum.com/showthread...hreadid=482220
>

[uberathlete]

^^ Thanks! I tried it but it doesn't seem to work

[Bob Phillips]

It works for me. What do you get?

--

HTH

RP
(remove nothere from the email address if mailing direct)


"uberathlete" <[email protected]>
wrote in message
news:[email protected]...
>
> ^^ Thanks! I tried it but it doesn't seem to work
>
>
> --
> uberathlete
> ------------------------------------------------------------------------
> uberathlete's Profile:
http://www.excelforum.com/member.php...o&userid=28388
> View this thread: http://www.excelforum.com/showthread...hreadid=482220
>

[uberathlete]

Whoops, my bad. I tried it again and it works. Only problem is that the blank cells in the B column which have no "match" or value in the A column all fill up with 0.

[Dave Peterson]

Maybe using column A would work better:

Range("B2").Autofill Range("B2").Resize(Range("A2").End(xlDown).Row-1)



uberathlete wrote:
>
> ^^ Thanks! I tried it but it doesn't seem to work
>
> --
> uberathlete
> ------------------------------------------------------------------------
> uberathlete's Profile: http://www.excelforum.com/member.php...o&userid=28388
> View this thread: http://www.excelforum.com/showthread...hreadid=482220

--

Dave Peterson

[uberathlete]

Wicked! Thanks Bob!

[Bob Phillips]

Change your formula to test fro 0 and output "".

--

HTH

RP
(remove nothere from the email address if mailing direct)


"uberathlete" <[email protected]>
wrote in message
news:[email protected]...
>
> Whoops, my bad. I tried it again and it works. Only problem is that the
> blank cells in the B column which have no "match" or value in the A
> column all fill up with 0.
>
>
> --
> uberathlete
> ------------------------------------------------------------------------
> uberathlete's Profile:
http://www.excelforum.com/member.php...o&userid=28388
> View this thread: http://www.excelforum.com/showthread...hreadid=482220
>