Microsoft KB Archive/168970

= XL97: Cannot Use New Keyword to Create Workbook Object =

Article ID: 168970

Article Last Modified on 11/23/2006

-

APPLIES TO


 * Microsoft Excel 97 Standard Edition

-



This article was previously published under Q168970



SYMPTOMS
If you use the New keyword to create a Workbook object using Automation, you may receive the following error message:

Run-time error '429':

ActiveX component can't create object



WORKAROUND
Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact a Microsoft Certified Partner or the Microsoft fee-based consulting line at (800) 936-5200. For more information about Microsoft Certified Partners, please visit the following Microsoft Web site:

https://partner.microsoft.com/global/30000104

For more information about the support options that are available and about how to contact Microsoft, visit the following Microsoft Web site:

http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS

To create a Microsoft Excel Workbook object through Automation, use the CreateObject function.

The following example illustrates how to create a Microsoft Excel Workbook object through Automation:  Start Microsoft Word 97. Start the Visual Basic Editor (press ALT+F11). On the Insert menu, click Module. Click References on the Tools menu. Select "Microsoft Excel 8.0 Object Library" in the Available References list box, and then click OK.  Enter the following code into the Visual Basic module: Sub WorkAround Dim objXL As Excel.Workbook

' Create a new Excel workbook. Set objXL = CreateObject("excel.sheet")

' Display the version number of Microsoft Excel. MsgBox objXL.Parent.Version

' Close Microsoft Excel. Set objXL = Nothing End Sub  Run the WorkAround subroutine.</ol>

Note that a message box is displayed with the version number of your copy of Microsoft Excel.

<div class="status_section">

STATUS
Microsoft has confirmed this to be a problem in the Microsoft products listed at the beginning of this article.

<div class="references_section">