[ツリー表示へ] [ワード検索] [Home]
タイトル ： エクセルシートを最前面に表示したい 投稿日 ： 2014/05/06(Tue) 11:25 投稿者 ： 小村
| いつも拝見させて頂いている小村と申します。 今回、コマンドボタンを押したらエクセルシートが表示出来るようにプログラム作成中です。 一応、表示できるようになったのですが、なぜか、フォームの後ろ（最背面）に エクセルのシートが表示されてしまいます。 出来れば、最前面に表示したいと思っておりますがうまく行かないので、 大変申し訳ございませんが、アドバイスして頂けると幸いです。 とりあえず、コマンドボタンのソースを書いておきますので、よろしくお願い致します。 (Windows7、VB6.0 SP6、エクセル2010) ※コマンドボタンのソース抜粋 Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Open("D:\BOOK.xls", ReadOnly:=True) Set xlSheet = xlBook.Worksheets(1) xlApp.Visible = True xlSheet.Activate 上記ソースでエクセルのシートは表示されるのですが、なぜか最背面に表示されてしまう。 |
をクリックするとツリー全体を一括表示します） - エクセルシートを最前面に表示したい - 小村 14/05/06-11:25No.15896