如何根据VBA中的另一列自动填充？

Question

我正在尝试根据A列中的值数自动填充范围。这是我的代码：

Dim Pricing As Worksheet
Dim lrp As Long

lrp = Pricing.Range("A3" & Pricing.Rows.Count).End(xlUp).Row
Pricing.Range("B3:AR3").AutoFill Destination:=Pricing.Range("B3:AR" & lrp)

定价工作表数据从第3列开始，从B列开始，一直到AR。当我运行此代码时，不会出现任何错误。没有数据被自动填充。

我需要根据相邻列（A列）自动填充范围。知道如何实现这个目标吗？