タイトル : VBからエクセルを操作する MSGBOX 投稿日 : 2011/07/13(Wed) 06:03 投稿者 : あさがお44
いつも困った時に来てすみませんがよろしくお願いします。 環境 Win XP、 VB6.0、 EXCEL2007 したい事はVBからエクセルの表を作り最後にエクセルを表示する事です。 これ自体は出来ています。 分からないのはこの時 MSGBOX "完了しました。" とやるとVBの画面に表示するので 順番が VB、MSGBOX、エクセル になってしまいます。 VB、エクセル、MSGBOX の順に出すにはどうすればいいのでしょうか? 下記のようにするとERRになります。 'エクセルを起動する Set AppExcel = CreateObject("Excel.Application") AppExcel.Visible = False Set wb = AppExcel.Workbooks.Open(FILE_NM) retL = KY_SetXLAP(AppExcel) AppExcel.Sheets(1).Select 表を作成(ここは長いので削除) AppExcel.Visible = True AppExcel.MsgBox "完了しました。" 何か方法はないかと探したのですが分かりませんでした。 よろしくお願いします。 |