我的代码的这一部分出现了运行时错误。这就是我如何定义我的动态范围:
Fulfillment_Status='0_DeliveryDateOrders'!$J$2:INDEX('0_DeliveryDateOrders'!$J$2:$J$100000,COUNTA('0_DeliveryDateOrders'!$I$2:$I$100000),0)
奇怪的是,当我在Fulfillmet_status范围内只有1行数据时,我会出现这个错误,这意味着,当数据只在J2单元格中时,我就会出现这个错误。有什么变通办法可以避免这种情况吗?
Range("J2").Select
ActiveCell.FormulaR1C1 = "=""unfulfilled"""
Selection.AutoFill Destination:=Range("Fulfillment_Status")
我认为,您的问题来自于您试图填充从活动工作表Range("J2")
到工作表"的范围;0_交货日期订单"命名范围,这是不可能的。请尝试:
Range("Fulfillment_Status").Parent.Range("J2").Formula = "=""unfulfilled"""
Range("Fulfillment_Status").Parent.Range("J2").AutoFill Destination:=Range("Fulfillment_Status")
它将从命名范围中提取必要的图纸,并独立于活动图纸使用它。
但是,如果您需要/想要根据命名的范围地址自动填充活动工作表,这是可能的,但方式不同。如果你想要,请说明,我会编辑答案,并为这种情况显示另一种变体。