V lookup Code

[vinothsudar]

Hello friends,

Good Day.

I am Looking for Simple VBA Code for V look up.

Sheet 1

Excel Workbook
	A	B	C	D
5	Name	Amount	credit	Debit
6	Ravi
7	Suresh
8	Kannan
Sheet1

Compare with Sheet 2:

Excel Workbook
	D	E	F	G
1	Name	Amount	credit	Debit
2	Ravi	200	100	100
3	Kann	500	100	400
4	Sures	800	200	600
5	Suresh	700	300	400
6	Kannan	600	400	200
Sheet2

Solution:

Excel Workbook
	A	B	C	D
5	Name	Amount	credit	Debit
6	Ravi	200	100	100
7	Suresh	700	300	400
8	Kannan	600	400	200
Sheet1

 

[JackDanIce]

For the amount column, try:

=VLOOKUP($A6,'Sheet2'!$D$1:$G$6,2,0)

Change 2 to 3 for credit column and 2 to 4 for debit column
(keep everything else the same)

 

[jim may]

Copy B2 Formula to where needed

Excel Workbook
	A	B	C	D
1	Name	Amount	credit	Debit
2	Ravi	200	100	100
3	Suresh	700	300	400
4	Kannan	600	400	200
Sheet1

Excel 2007

Cell Formulas
Range	Formula
B2	=VLOOKUP($A2,Sheet2!$A$2:$D$6,COLUMN(),FALSE)

Excel Workbook
	A	B	C	D
1	Name	Amount	credit	Debit
2	Ravi	200	100	100
3	Kann	500	100	400
4	Sures	800	200	600
5	Suresh	700	300	400
6	Kannan	600	400	200
Sheet2

Excel 2007

 

[mstarr388]

THis is not a VBA code, but this might be what your looking for.

In sheet1, cell B6, type:
=vlookup(A6,'sheet2'!$D$2:$G$6,2,false)
Drag this down the column C6 and D6, changing the 2 to 3 and 4, respectively:

=vlookup(A6,'sheet2'!$D$2:$G$6,3,false)
=vlookup(A6,'sheet2'!$D$2:$G$6,4,false)

Enter the same thing in cell

 

[vinothsudar]

Hello sir,

I Need VBA Code Sir....

 

[JackDanIce]

Record a macro where you type those formula's in and then stop recording

 

[jim may]

OK,,

Sub Foo()
Range("B2:D4").Formula = "=VLOOKUP($A2,Sheet2!$A$2:$D$6,COLUMN(),FALSE)"
End Sub