[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2004/08/23(Mon) 10:42
投稿者名:まっちゃん
Eメール:mm02-sin@kh.rim.or.jp
URL :
タイトル:
処理中のExcelを表示し、Excelを触れない
何時も読ましていただき、大変に勉強になります。
今回、ちょっと思ったのですが、どのようにすれば
実現できるか教えて頂きたく カキコしました。
<<やりたい事>>
VB6であるデータをExcelに書き出す処理中
書き出される様をExcelを表示し表現できるのですが、
この処理中に、Excelをクリックする事で
エラーがが発生するなどがある為、
Excelをクリックできないようにしたいのですが
このようなことは可能でしょうか?

ご指導ご鞭撻を宜しくお願い致します。

投稿時間:2004/08/23(Mon) 11:35
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: 処理中のExcelを表示し、Excelを触れない
WebBrowser コントロールをFrame 上に貼付 Frame1.Enabled = False でExcelを表示し
操作するとそのような事はできますが、貴方の目的にあっているかは? です。

後は、ここの [イベントプロシージャ関係]の
[マウスイベントを無効にし、マウスカーソルを非表示にする]でマウス操作を出来
なくする等。

投稿時間:2004/08/24(Tue) 08:54
投稿者名:まっちゃん
Eメール:mm02-sin@kh.rim.or.jp
URL :
タイトル:
Re^2: 処理中のExcelを表示し、Excelを触れない
申し訳ございません。
説明不足でした、VBでExcelの操作を見せながら
処理を実行したいので、Frameを使うとExcelの操作を
見せる事ができません。
処理中のExcelをユーザーが操作できないように
する方法はないのでしょうか?

投稿時間:2004/08/24(Tue) 08:57
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re^3: 処理中のExcelを表示し、Excelを触れない
> 処理を実行したいので、Frameを使うとExcelの操作を
> 見せる事ができません。
どうしてですか?

試して見たのですか?
私は、試してから回答したのですが。


1.Form に Frame と Commandボタンを貼り付けて下さい。
2.そのFrame 上にテキストボックスを配置して下さい。
3.以下のコードを実行して下さい。

Private Sub Command1_Click()
    Text1.Text = "書きました"
End Sub

Private Sub Form_Load()
    Frame1.Enabled = False
End Sub

投稿時間:2004/08/24(Tue) 11:27
投稿者名:まっちゃん
Eメール:mm02-sin@kh.rim.or.jp
URL :
タイトル:
Re^4: 処理中のExcelを表示し、Excelを触れない
申し訳ございません。
WebBrowserについて、詳しくないので
やってみようとしたのですが、
処理とゆうのがデータを新規の複数シート・複数ブックに
出力するもので、その操作をWebBrowser上で実現する事に
挫折してしまいました。
勉強不足で申し訳ございませんが、上記のような操作を
行うことは可能でしょうか?
特に、WebBrowserにExcelを代入する方法がわからなく、
ファイル名など新規ブックにはない為、操作が分かりません。
宜しくお願い致します。

投稿時間:2004/08/24(Tue) 12:03
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re^5: 処理中のExcelを表示し、Excelを触れない
すでに試されたのではなかったのですか?

WebBrowser Excel あたりをキーワードに検索すればいくらでもでてきますよ。

hhttp://support.microsoft.com/?kbid=304643

ここの掲示板のNo.6856 等

ちなみに上記MSのサイトのは、.NET 用になっていますが、VB6.0でも殆ど変わらないはずです。
又、OLE コンテナコントロールでも同様の表示はできます。

投稿時間:2004/08/24(Tue) 14:48
投稿者名:まっちゃん
Eメール:mm02-sin@kh.rim.or.jp
URL :
タイトル:
Re: 処理中のExcelを表示し、Excelを触れない
Excel.Application.Interactive を
使用することで、実現できました。
ありがとうございました。
又、WebBrowserをもっと勉強して、使えるようになります。
ご指導、ご鞭撻をありがとうございました。