如何將VLOOKUP放入單元格中並將其粘貼下來？

我在VBA中使用VlookUp，但它只適用於一個單元格。如何將VLOOKUP放入單元格中並將其粘貼下來？

For Each MyCell In Selection 
    MyCell = application.WorksheetFunction.VlookUp(Range("C2"), Range("A2:B50000"), 2 , 0) 
Next

我想設置一個VlookUp在單元格，再擀這給所有其他細胞。但我只能將公式放在第一個單元格中，然後雙擊其他單元格。

來源

2015-06-23 Alexandre Gentil

嘗試此代替：

With Selection 
    .FormulaR1C1 = "=VLOOKUP(RC3,R2C1:R50000C2,2,FALSE)" 
    .Value = .Value '// Comment out if you don't want to paste values. 
End With

此進入VLOOKUP()式成使用用於查找值的行的相對引用的每個小區，然後有效地粘貼值替換式。

如果你真的想你可以使用VBA語法：

For Each myCell In Selection 
    myCell.Value = WorksheetFunction.Vlookup(Cells(myCell.Row, 3), Range("A2:B50000"), 2, False) 
Next

來源

2015-06-23 13:15:07

如何將VLOOKUP放入單元格中並將其粘貼下來？

回答

相關問題