Tag: 备用

build立备用单元格范围vba

我的意图是build立一个dynamic的替代细胞范围失败，显然是缺乏知识。 For j = 1 To numFrame Set MaxStRange_OD_OUT = ActiveSheet.Range(Cells(1, 2 * (j + 1))) MaxVal = Application.Max(MaxStRange_OD_OUT) Debug.Print MaxVal Next j 我想要的是 MaxStRange_OD_OUT = ActiveSheet.Range(Cells(1, 4),Cells(1, 6),Cells(1, 8)) 当然细胞的数量可以改变，比如从1到10（numFrame） 谢谢