プログラムがExcelを起動させ、Excel画面を表示させるという流れです。Windows Server 2003までExcelが最前面に表示されましたが、Windows Server 2008(R2を含む)でExcelが最前面に表示されない現象が起きましたが、どうすればよいのでしょうか。
サンプルコード
Private Excel As Object '!Excel
Private Sub Form_Load()
Set Excel = CreateObject("Excel.Application")
With Excel
.Workbooks.Open "D:\scal.xls" 'Excelファイル
.ActiveWorkbook.Saved = True
.Application.ScreenUpdating = True
.Visible = True
End With
End Sub