用于循环运行到特定列

时间:2016-06-27 13:46:50

标签: excel vba excel-vba syntax

我正在尝试将此代码更改为仅从第3列转到工作簿中的某个列。而不是我现在所拥有的,我在语法需要改变的方式上留下了空白,以便允许我这样做。谢谢!

For chartdatacol = 3 To Worksheets("Chart Data").Cells(Rows.Count, 2).End(xlUp).row

2 个答案:

答案 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