我正在尝试将此代码更改为仅从第3列转到工作簿中的某个列。而不是我现在所拥有的,我在语法需要改变的方式上留下了空白,以便允许我这样做。谢谢!
For chartdatacol = 3 To Worksheets("Chart Data").Cells(Rows.Count, 2).End(xlUp).row
答案 0 :(得分:1)
如果要循环浏览最后一列,请使用
Worksheets("Chart Data").Cells(1, Worksheets("Chart Data").Columns.Count).end(xlToLeft).Column
这假设第1行包含您感兴趣的最后一列中的数据。
所以你的循环看起来像
For chartdatacol = 3 To Worksheets("Chart Data").Cells(1, Worksheets("Chart Data").Columns.Count).End(xlToLeft).Column
答案 1 :(得分:0)
为清楚起见,我会从你的for语句中取出数字
Dim i as Integer,
lastCol as Integer,
firstCol as Integer
firstCol = 3
lastCol = mySheet.UsedRange.Columns.Count
For i = firstCol to lastCol
--Do something
Next i