Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Add value to the content of a cell with Vlookup
Hi I have this piece of code add to the content of the cell selected a
figure that I will find with a vlookup function into another spreadsheet (book1), but it cause an error? can you help? Sub update_figures() Dim Q1_bill As Integer Dim Total As Integer Dim rng As Range Set rng = Workbooks("Book1").Sheets("Pivot").Range("A6:U215" ) For i = 2 To 200 Q1_bill = ActiveSheet.Range("u" & i).Value Total = Q1_bill + Application.VLookup("b" & i, rng, 19, False) ActiveSheet.Range("u" & i).Select = Total Next i End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Add value to the content of a cell with Vlookup
On Sep 1, 9:56*am, Nicawette wrote:
Hi I have this piece of code add to the content of the cell selected a figure that I will find with a vlookup function into another spreadsheet (book1), but it cause an error? can you help? Sub update_figures() Dim Q1_bill As Integer Dim Total As Integer Dim rng As Range Set rng = Workbooks("Book1").Sheets("Pivot").Range("A6:U215" ) For i = 2 To 200 Q1_bill = ActiveSheet.Range("u" & i).Value Total = Q1_bill + Application.VLookup("b" & i, rng, 19, False) ActiveSheet.Range("u" & i).Select = Total Next i End Sub Several errors. Fully specify the workbook with .xls Use proper syntax for the vlookup '===== option explicit Sub lookupmacro()' Modify to suit Dim rng As Range Dim i As Long Set rng = Workbooks("20100801.xls").Sheets("Sheet9").Range(" A6:U215") For i = 2 To 5 Cells(i, "u") = Application.VLookup(Cells(i, "b"), rng, 19, 0) Next i End Sub '====== |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Add value to the content of a cell with Vlookup
thank you Don
|
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Content of cell in Vlookup function | Excel Worksheet Functions | |||
vlookup - extracting cell content from external spread sheet | Excel Worksheet Functions | |||
Conditional formatting formula that uses VLookup, based on content of another cell | Excel Discussion (Misc queries) | |||
Conditional formatting formula that uses VLookup, based on content of another cell | Excel Discussion (Misc queries) | |||
vlookup to extract part cell content | Excel Discussion (Misc queries) |