Excel 生成具有动态范围的下拉列表

我想创建一个带有动态数据范围

工作表（数据表）的下拉列表。范围（单元格（rng\u rw\u开始，rng\u cl\u开始），单元格（rng\u rw\u结束，rng\u cl\u开始）

。它的行和列都是动态的，由以前的代码生成。下面是我的代码：

 Dim datasheet as string
 Dim rng_rw_start as integer
 Dim rng_rw_end as integer
 Dim rng_cl_start as integer
 Dim rng_cl_end as integer
 set data_rng = worksheets(datasheet).range(cells(rng_rw_start,rng_cl_start),cells(rng_rw_end ,rng_cl_start ))
 set dropdown_cell = worksheets(datasheet).range("A5")
 With drop_down_cell.validation
           .Delete
           .Add Type:=xlValidateList, _
               Alertsytle:=xlvalidAlertstop, _
               Operator:=xlBetween, _
               Formula1:=data_rng
           .ErrorMessage = "Please select a wafer type from the list"
 End With

我认为问题出在“Formula1”中。我不知道如何引用动态数据范围。我见过一些代码具有动态行，如

Formula1:=“='Sheet1'！$A$10:A”&LastRow

，但没有列和行都是动态的

---

出现应用程序定义或对象定义错误

try:

Formula1:=“=”&data\u rng.Address（1,1，xlA1,1）

@ScottCraner已尝试，但仍显示“应用程序定义或对象定义错误”…确定尝试：

Formula1:=“=”&data\u rng.Parent.Name&“！”&data\u rng.Address（1,1）

显示错误的是哪一行？@ScottCraner第二行仍然显示错误。错误在下拉列表的添加行-“。添加类型：=xlValidateList，\uAlertSytle:=xlvalidaalertstop，\u0。运算符：=xlBetween，\u0。公式1:=data\uRNG”