お願いします。

質問

vbaでエラーが出ているみたいなのですが、分かりません。SHeets()の行でエラーが出てます。

e = Worksheets("sheet1").UsedRange.Rows.Count
For j = 2 To e Step 1
Sheets("sheet2").Cells(j + 1, 1) = Sheets("sheet1").Cells(j, 1)

ちなみにCells(j,1)をCells(j + 1, 1)にしたらエラーが出始めました。
エラーは"アプリケーション定義またはオブジェクト定義のエラーです。"です。
よろしくお願い致します。

回答No.2

doara_2011 · ベストアンサー

＞あとeの値が67000くらいあるのでデータの多すぎが原因でしょうか？
＞また、excel 2007で97-2003方式で保存してるのが原因でしょうか？

#1です。
正に上記が原因でしょう。2003まではワークシートに最大で65536行までしか
保存できませんでしたから。だから実行できているように見えても
マクロの途中で止まっているはずです。

以上

お礼

多すぎるとだめなんですね。
ありがとうございました!!

回答No.1

doara_2011

文法的にはあっているように見えます。
言われているようなエラーは、jが、0以下とかになっている場合には
出力されます。エラーが出力される場合、jの値はいくつになっているでしょうか？

補足

実はちゃんと出力されるんです!!
ただ、エラーも一緒に出てしまうのであと味悪くて。
あとeの値が67000くらいあるのでデータの多すぎが原因でしょうか？
また、excel 2007で97-2003方式で保存してるのが原因でしょうか？