I've got a VB6 program that opens Excel. Everything works fine on most computers but on one computer Excel starts minimized. This is Excel 2010 and the .displayfullscreen method doesn't seem to be supported.
Anybody have any idea how to get Excel 2010 to come up maximized?
Code:Dim exExcel As Object Dim oBook As Object Dim oSheet As Object Set exExcel = CreateObject("Excel.Application") exExcel.Workbooks.Open (FileToFill) Set oSheet = exExcel.Sheets(1) oSheet.Cells(1, 1).value = "My value goes here" ' had to comment this line out because it causes an error ' exExcel.DisplayFullScreen = True exExcel.Show Set oSheet = Nothing Set oBook = nothing Set exExcel = Nothing




Reply With Quote
