如何在内存中添加一个数字和一个单元格的值

这是我的代码：

Dim i As Integer For i = 1 To 116 ActiveChart.FullSeriesCollection(i).Select With Selection.Format.Line .Visible = msoTrue .Weight = "=R!$B$" & CStr(i + 1) + 0.75 End With Next i End Sub 

我试图让这根据相应的单元格中的值自动分配一个图表系列的边界。

Answer 1

您需要从单元格获取值作为Range对象 。

 .Weight = sheets("R").Range("B" & CLng(i + 1)).value + 0.75