Vlookupから最後のcolセルまで - VBA

Question

セルU2のCol U（XXX）でvlookupを実行していて、U列の最後のセルまでvlookupの式をコピーします。以下は

私が使用していたコードです：私は同じことを実行することはできませんよしかし

Range("U1").Value = "XXX" 
Range("U2").Select 
ActiveCell.FormulaR1C1 = _ 
    "=VLOOKUP(RC[-1],'[XXX.xlsm]GLOBAL_HEADCOUNT_export'!C1:C32,30,0)" 

Selection.End(xlDown).Select 
ActiveCell.Offset(0, 21).Select (using 21 since its the U col) 
Range(Selection, Selection.End(xlUp)).Select 
Selection.FillDown 

。ここで私を助けてくれますか？

Answer 1

私はVLOOKUP式をチェックしませんでしたが、あなたは列にこの数式をコピーしたい場合はUは列で既存のセルを最後それまではUを、以下の簡単なコードを使用します

last_row = Cells(Rows.count, "U").End(xlUp).Row 

Range("U1").Value = "XXX" 
Range("U2:U" & last_row).FormulaR1C1 = "=VLOOKUP(RC[-1],'[XXX.xlsm]GLOBAL_HEADCOUNT_export'!C1:C32,30,0)"