【求助】在VB代码里，如何用函数来赋值？

panjianhui

以下代码能实现：
Private Sub Worksheet_Change(ByVal Target As Range)
Cells(8, 2) = Cells(4, 6)
End Sub
但是如果我想直接用一个函数得到的结果复制给他可以吗？
例如：
Private Sub Worksheet_Change(ByVal Target As Range)
cells(8,2)=vlookup（。。。。。。。）
End Sub
可以实现吗？如果可以，应该怎么写呢？