该代码根据活动单元格的位置设置范围。此范围将部分用于创建饼图。
Item.Address is $Z$6
ActiveCell.Address is $Z$5
Item.Offset(1, 0).Address is $Z$7
Item.End(xlDown).Offset(-1, 0).Address is $Z$13
我希望下面的代码返回地址$ Z $ 7:$ Z $ 13
Set DataRange = ActiveCell.Range(Item.Offset(1, 0), Item.End(xlDown).Offset(-1, 0))
但是它返回$ AY $ 11:$ AY $ 17的地址
此调用之前的类似逻辑有效
ActiveSheet.Range(ActiveCell.Offset(2, -1), ActiveCell.Offset(2, -1).End(xlDown).Offset(-1, 0)).Address is $Y$7:$Y$13
答案 0 :(得分:0)
typo-ActiveCell.Range应该是Activesheet.Range