Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.lang.basic.visual.misc > #1240

Re: Problem automating Excel 2007 under Win7

Cross-posted to 2 groups.

Show all headers | View raw

"GS" <gs@somewhere.net> skrev i meddelandet 
news:jrlq60$uqf$1@dont-email.me...
> ralph formulated on Sunday :
>> On Sun, 17 Jun 2012 15:04:17 -0400, GS <gs@somewhere.net> wrote:
>>
>>> Hi all,
>>>
>>> Does anyone know why my VB6.exe can't get Excel 2007 to run under Win7? 
>>> It works fine when I set the default Office as MSO 2003, but not working 
>>> when default Office is MSO 2007. Both installs are 'Professional' 
>>> editions. (This doesn't happen under XP)
>>>
>>> Thanks in advance. All/any help will be most appreciated!
>>
>> Need more information.
>>
>> "... can't get Excel 2007 to run ..."?
>> Error messages? Hangs? Nothing? Odd behavior? ...
>>
>> Automation - late or early binding? Library?
>>
>> ...
>>
>> -ralph
>
> Using CreateObject("Excel.Application") and it doesn't open Excel. Here's 
> my code...
>
> Sub StartApp()
>  Dim xlWkb As Excel.Workbook, oCA As Object
>
>  On Error GoTo errExit
>  Set xlApp = CreateObject("Excel.Application")
>  With xlApp
>    If .Version >= 12 Then
>      For Each oCA In .COMAddIns: oCA.Connect = False: Next 'oCA
>      Set xlWkb = .Workbooks.Open(FileName:=App.Path & gsAPP_WKB_UI12, 
> Password:=gszPWRD)

Missing & "\" in App.Path & gsAPP_WKB_UI12?


>    End If
>    Set xlWkb = .Workbooks.Open(FileName:=App.Path & "\" & gszAPP_WKB, 
> Password:=gszPWRD): xlWkb.RunAutoMacros xlAutoOpen
>    .WindowState = xlMaximized: .Visible = True: .UserControl = True
>  End With
>
> errExit:
> '  Screen.MousePointer = vbDefault
>  Set xlWkb = Nothing: Set xlApp = Nothing
> End Sub
>
> -- 
> Garry
>
> Free usenet access at http://www.eternal-september.org
> ClassicVB Users Regroup!
>    comp.lang.basic.visual.misc
>    microsoft.public.vb.general.discussion
>

/Henning

Back to comp.lang.basic.visual.misc | Previous | Next — Previous in thread | Next in thread | Find similar

Thread

Problem automating Excel 2007 under Win7 GS <gs@somewhere.net> - 2012-06-17 15:04 -0400
  Re: Problem automating Excel 2007 under Win7 ralph <nt_consulting64@yahoo.com> - 2012-06-17 16:57 -0500
    Re: Problem automating Excel 2007 under Win7 GS <gs@somewhere.net> - 2012-06-17 19:45 -0400
      Re: Problem automating Excel 2007 under Win7 "Henning" <computer_hero@coldmail.com> - 2012-06-18 01:56 +0200
        Re: Problem automating Excel 2007 under Win7 GS <gs@somewhere.net> - 2012-06-17 20:07 -0400
          Re: Problem automating Excel 2007 under Win7 "Farnsworth" <nospam@nospam.com> - 2012-06-18 06:28 -0400
            Re: Problem automating Excel 2007 under Win7 GS <gs@somewhere.net> - 2012-06-18 09:36 -0400
            Re: Problem automating Excel 2007 under Win7 GS <gs@somewhere.net> - 2012-06-18 12:41 -0400
  Re: Problem automating Excel 2007 under Win7 GS <gs@somewhere.net> - 2012-06-17 20:37 -0400

csiph-web