|
▼IROC さんわかりづらくてすみません。
>>Private Sub CommandButton1_Click()
>> Do
>> CDNtule_form.Show
>> Loop
>> Unload me
>>end sub
>
>↑ここでは何のためにループしているのでしょうか?
フォームをループしたのは連続的に表示させたかったからです。ただ
フォーム名.showとだけ書いてもいいでしょうが。。。
>上記のコードは、どこに記述して使用しているのでしょうか?
>この処理は解りづらいのですが、どのようなことをしたいのか
>目的を教えて頂けませんでしょうか?
その後書いたのは、フォームの中で記述しているソースです。
処理はフォームを開き、ファイルを開くボタンを押下し、データファイルを開き、
対象のシートを選択します。
シートがどこにあるか判断つかないので、msgboxを使用して1シートずつアクティブにしてユーザに判断してもらいます。そして対象のシートになるまでfor nextでまわしています。
2000では worksheets(シート名(jj)).activateで問題なく選択できたのですが。。
XPのバグなのかなんなのかわかりません。
申し訳ありませんがご教授願います。
もしかすると前文の シート名(jj) = Worksheets(インデックスNO).Name
これが悪さしてるのでしょうか。
乱筆、乱文失礼致しました。宜しくお願いいたします。
|
|