2016-06-27 3 views
1

このコードを変更すると、列3から特定の列のブックに移動するだけです。私が今持っているものの代わりに、私はこれを行うために構文がどのように変わる必要があるかについて空白を描いています。ありがとう!特定の列を実行するループの場合

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

答えて

1

あなたが最後の列をループにしたい場合は、これは、行1はあなたが興味のある最後の列のデータを持っていることを前提としてい

Worksheets("Chart Data").Cells(1, Worksheets("Chart Data").Columns.Count).end(xlToLeft).Column 

を使用しています。

だからあなたのループが見えますlike

+0

非常に良い点@Ralph –

+0

大丈夫ですが、 '.Row'の代わりに' .Column'が必要です。 –

+0

また、上部の部分を編集してそれに合わせることもできます。 –

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 
関連する問題