THANKS GUYS this works great

is there a way to set this up on VBA

On Dec 22, 1:07 pm, "Excel_Lover" <rajanverma1...@gmail.com> wrote:
> See the attached File
>
> Rajan.
>
>
>
>
>
>
>
> -----Original Message-----
> From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
>
> On Behalf Of dguillett1
> Sent: 22 December 2011 21:14
> To: MS EXCEL AND VBA MACROS
> Subject: Re: $$Excel-Macros$$ reference vlookup sheets
>
> You shouldn't need code here. Look in the HELP index for INDIRECT and apply
> to your vlookup formula
>
> Don Guillett
> SalesAid Software
> dguille...@gmail.com
> -----Original Message-----
> From: Selva
> Sent: Wednesday, December 21, 2011 6:02 PM
> To: MS EXCEL AND VBA MACROS
> Subject: $$Excel-Macros$$ reference vlookup sheets
>
> the follwoing is the code i;m using to reference 7 sheets into a
> master list, the problem i'm running into is the vlookup it's selva
>
> i need B2 to loop ie once the first cell is tetermin to be b2 i need
> marco to look b3,b4,b5,b6,b7 ect..B"end"
>
> any thoughts on how i can do this
>
> can this be setup in a Array??
>
> Range("m2").Select
>
> Do Until IsEmpty(ActiveCell)
>
>     If ActiveCell.Value = "home" Then
>         ActiveCell.Offset(0, -2).Value = "=VLOOKUP(B2,home!B:K,
> 10,FALSE)"
>
>     ElseIf ActiveCell.Value = "windows" Then
>     ActiveCell.Offset(0, -2).Value = "=VLOOKUP(B2,windows!B:K,
> 10,FALSE)"
>
>     ElseIf ActiveCell.Value = "messages" Then
>         ActiveCell.Offset(0, -2).Value = "=VLOOKUP(B2,messages!B:K,
> 10,FALSE)"
>
>     ElseIf ActiveCell.Value = "ready" Then
>     ActiveCell.Offset(0, -2).Value = "=VLOOKUP(B2,ready!B:K,10,FALSE)"
>
>     ElseIf ActiveCell.Value = "select" Then
>     ActiveCell.Offset(0, -2).Value = "=VLOOKUP(B2,select!B:K,
> 10,FALSE)"
>
>     ElseIf ActiveCell.Value = "phone" Then
>     ActiveCell.Offset(0, -2).Value = "=VLOOKUP(B2,phone!B:K,10,FALSE)"
>
>      ElseIf ActiveCell.Value = "asset" Then
>     ActiveCell.Offset(0, -2).Value = "=VLOOKUP(B2,asset!B:K,10,FALSE)"
>
>     End If
>
>     ActiveCell.Offset(1, 0).Select
>
> Loop
>
> End Sub
>
> --
> FORUM RULES (934+ members already BANNED for violation)
>
> 1) Use concise, accurate thread titles. Poor thread titles, like Please
> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will
>
> not get quick attention or may not be answered.
>
> 2) Don't post a question in the thread of another member.
>
> 3) Don't post questions regarding breaking or bypassing any security
> measure.
>
> 4) Acknowledge the responses you receive, good or bad.
>
> 5)  Cross-promotion of, or links to, forums competitive to this forum in
> signatures are prohibited.
>
> NOTE  : Don't ever post personal or confidential data in a workbook. Forum
> owners and members are not responsible for any loss.
>
> --------------------------------------------------------------------------- -
> --------------------------
> To post to this group, send email to excel-macros@googlegroups.com
>
> --
> FORUM RULES (934+ members already BANNED for violation)
>
> 1) Use concise, accurate thread titles. Poor thread titles, like Please
> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will
> not get quick attention or may not be answered.
>
> 2) Don't post a question in the thread of another member.
>
> 3) Don't post questions regarding breaking or bypassing any security
> measure.
>
> 4) Acknowledge the responses you receive, good or bad.
>
> 5)  Cross-promotion of, or links to, forums competitive to this forum in
> signatures are prohibited.
>
> NOTE  : Don't ever post personal or confidential data in a workbook. Forum
> owners and members are not responsible for any loss.
>
> --------------------------------------------------------------------------- -
> --------------------------
> To post to this group, send email to excel-macros@googlegroups.com
>
>
>
>  IndirectFunction.xlsx
> 18KViewDownload

-- 
FORUM RULES (934+ members already BANNED for violation)

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.

2) Don't post a question in the thread of another member.

3) Don't post questions regarding breaking or bypassing any security measure.

4) Acknowledge the responses you receive, good or bad.

5)  Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com

Reply via email to