Wrox Programmer Forums
Go Back   Wrox Programmer Forums > Microsoft Office > Other Office > Infopath
|
Infopath Programming and automation discussions only please. :)
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Infopath section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
 
Old May 12th, 2008, 05:36 AM
Authorized User
 
Join Date: Jun 2003
Posts: 29
Thanks: 0
Thanked 0 Times in 0 Posts
Default Automation Problems in 2002 Dev Edition

Hi

I have posted this to the Access VBA but without result. It does I think come under the header of Automation in that it deals with creating an excel object within Access 2002 Developer Edition

Hi

I have used the developer edition a few times to provide a simple database with the run time files where the client did not have a copy of MSOffice.

I have not ever had to provide an Access database with the ability to use Excel as well as Access under similar circumstance. Recently I had such a request.

I am having difficulty in achieving this....To indicate my level of skill with the run time file side of Access 2002 Deveoper I know how to use the packaging wizard....Well I thought I knew

Heres what I have done to date

Created the Dabatase. Created a Blank .xls workbook.

When using the wizard I included the XL DLL (Having found its locations by going into references in the VBA editor
I also included the Blank .xls WorkBook

Lastly I placed a command button on one of the forms in the dbase with the following code attached to the click event. The syntax is I think what is called late binding and is appropriate to that which I am trying to achieve (allegedly)

Private Sub CmdOpenXLApp_Click()
On Error GoTo Err_CmdOpenXLApp_Click

    Dim oApp As Object

    Set oApp = CreateObject("Excel.Application")
    oApp.Visible = True

    On Error Resume Next
    oApp.UserControl = True

Exit_CmdOpenXLApp_Click:
    Exit Sub

Err_CmdOpenXLApp_Click:
    MsgBox Err.Description
    Resume Exit_CmdOpenXLApp_Click

End Sub


When I take the output from the packaging wizard and load it on to a PC (Without MSoffice)the Access dbase works but clicking the command button does not open excel to manipulate the xlsWorkbook

Advice appreciated

MF









Similar Threads
Thread Thread Starter Forum Replies Last Post
Access 2002 Developer Edition ManFriday Access VBA 1 May 12th, 2008 06:55 AM
Problems installing IIS 5 on XP-M.C.E. 2002 urbanwebdev Internet Information Services 2 December 22nd, 2006 07:03 PM
Serious Problems with Applications in Excel 2002 mike_tyrer Pro VB 6 0 September 23rd, 2004 08:28 AM
Professional ASP.NET 1.0 (2002 Edition) tgoodwin All Other Wrox Books 0 July 15th, 2003 01:33 AM
VB.NET Edition code problems Solved charul_shukla BOOK: ASP.NET Website Programming Problem-Design-Solution 5 July 11th, 2003 01:56 AM





Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright (c) 2020 John Wiley & Sons, Inc.