RangeクラスのSelectメソッドが失敗しました

[kazurayam]

I made Perfect_Excel_VBA_part3.xlsm. I executed the Xport Sub and got an error:

[kazurayam]

Err 1004 がなぜ発生したのか？

https://spreadsheetplanet.com/excel-vba/runtime-error-1004/

に説明がある。

ただしそこに挙げられたエラー要因がわたしのケースにあてはまるかというと、明白ではない。試行錯誤して本当の原因を見つけなければならない。

[kazurayam]

わかった。

_part3.xlsmをVBEで開いたときプロジェクトエクスプローラのなかにはXportモジュールがいくつあるか？じつは３つあるのだ。

• PerfectBook_part3プロジェクトのXportモジュール
• BackboneプロジェクトのXportモジュール (参照設定されたxlamファイルのもの)
• VBACallGraphSetupProjectプロジェクトの (参照設定されたxlamファイルのもの)

上記の１００４エラーが発生したとき、PerfectBook_part3プロジェクトのXportモジュールではなくて別プロジェクトのXportモジュールを実行したのだ。そのときWorksheetがActiveではない。だからSelectしたときに１００４エラーが発生する。

ものはためしで

ws.Activate
ws.Cells(2, 7).Select

と変更して実行したらエラーが発生しなくなった。だからこの推測は正しいとおもう。

[kazurayam]

なにはともあれ

ws.Activate

をするべきだろう。

[kazurayam]

done at v0.1.2