D
devnext
i can´t get this to work:
Dim count As Integer
Dim n As Integer
Dim table As String
Dim look As String
Dim column As Integer
count = Workbooks("BDs").Worksheets("bd_lx")._
Range("A2").Value
column = 3
For n = 4 To count
look = Workbooks("BDs").Worksheets("bd_lx")._
Range("B" & n).Value
table = Workbooks("BDs").Worksheets("bd_lx")._
Range("A" & n).Value
Application.WorksheetFunction._
VLookup(look, tabela, column, False).Select
Selection.Copy
can anyine see where is the error?
thanks
Dim count As Integer
Dim n As Integer
Dim table As String
Dim look As String
Dim column As Integer
count = Workbooks("BDs").Worksheets("bd_lx")._
Range("A2").Value
column = 3
For n = 4 To count
look = Workbooks("BDs").Worksheets("bd_lx")._
Range("B" & n).Value
table = Workbooks("BDs").Worksheets("bd_lx")._
Range("A" & n).Value
Application.WorksheetFunction._
VLookup(look, tabela, column, False).Select
Selection.Copy
can anyine see where is the error?
thanks