1
このコードを変更すると、列3から特定の列のブックに移動するだけです。私が今持っているものの代わりに、私はこれを行うために構文がどのように変わる必要があるかについて空白を描いています。ありがとう!特定の列を実行するループの場合
For chartdatacol = 3 To Worksheets("Chart Data").Cells(Rows.Count, 2).End(xlUp).row
このコードを変更すると、列3から特定の列のブックに移動するだけです。私が今持っているものの代わりに、私はこれを行うために構文がどのように変わる必要があるかについて空白を描いています。ありがとう!特定の列を実行するループの場合
For chartdatacol = 3 To Worksheets("Chart Data").Cells(Rows.Count, 2).End(xlUp).row
あなたが最後の列をループにしたい場合は、これは、行1はあなたが興味のある最後の列のデータを持っていることを前提としてい
Worksheets("Chart Data").Cells(1, Worksheets("Chart Data").Columns.Count).end(xlToLeft).Column
を使用しています。
だからあなたのループが見えますlike
わかりやすくするために、私はあなたの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
非常に良い点@Ralph –
大丈夫ですが、 '.Row'の代わりに' .Column'が必要です。 –
また、上部の部分を編集してそれに合わせることもできます。 –