vlookup across multiple workbooks

[CamVilla]

Hi, can someone help me. I need to vlookup across multple worksheets but I can't do it.

Sub Macro2()
Sheets("BASE").Select
Range("G13").Select
ActiveCell.FormulaR1C1 = _
"=+VLOOKUP(RC1,[C41.xls]Hoja1!R13:R65536,+COLUMN([C41.xls]Hoja1!R[1]C),FALSE)"
Range("G13").Select
Selection.AutoFill Destination:=Range("G13:JK13"), Type:=xlFillDefault
Range("G13:JK13").Select
Selection.AutoFill Destination:=Range("G13:JK243"), Type:=xlFillDefault
Range("G13:JK243").Select
End Sub

Instead of puting the file name (in this case C41), I would like to loop through files in a folder, is this possible?