|
のん さん、こんにちわ。
>>今回の動作実験内容
>>Book1.xls,Book2.xlsをDドライブのルートに保存
>>■Book1.xlsの標準モジュールに以下を記述・・・
>動作内容は先ほどりんさんが表記してくださったとおりです。
さっきの動作実験の内容でブックを作ってみて動作させてみてください。
(保存先のドライブ、フォルダは自由にして、読込先をちゃんと指定してください)
のんさんの期待通りの動きをすれば、現在のコードに問題があるし、同様にエラーになるなら別の所に問題があると思われます。
ついでに、DoEventsを足してみてください。
Private Sub UserForm_Activate()
ThisWorkbook.Activate
DoEvents
End Sub
>>あと、気になるのは、
>>ActiveWorkbook.Windows("book2").Activate ←これがエラーにならないのが不思議です
>私としては、book2がアクティブになればいいと思いいれたのですが
Book2.xlsを開いた場合、そのウィンドウは
ActiveWorkbook.Windows("book2.xls").Activate
になると思うのですけど。
書き忘れていましたが、動作確認は Win98 & XL2Kです。
|
|