XL98: Show Method Fails with Passed Arguments

ID: Q184380

The information in this article applies to:

SYMPTOMS

If you use the Show method with one of the built-in Microsoft Excel dialog boxes, you may receive the following error:

   Run-time error '1004':
   Show method of Dialog class failed

CAUSE

This problem may occur when both of the following conditions are true:

RESOLUTION

To resolve this problem, do not pass any arguments when you are using a constant that is new to Microsoft Excel 98 and you are using the Show method.

STATUS

This behavior is by design of Microsoft Excel 98.

MORE INFORMATION

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 the Microsoft fee-based consulting line at (800) 936-5200. For more information about the support options available from Microsoft, please see the following page on the World Wide Web:

   http://www.microsoft.com/support/supportnet/refguide/

The following sample code uses the xlDialogDataValidation constant, which is new to Microsoft Excel 98, to display the Data Validation dialog box:

   Sub Test()
      Application.Dialogs(xlDialogDataValidation).Show
   End Sub

Note that if you use this constant in the following sample code, you receive an error message:

   Sub Test2()
      Application.Dialogs(xlDialogDataValidation).Show 1
   End Sub

The "1" that follows the Show method implies that you want to select the first item in the Allow list, which is a whole number.

The following lines of code do not generate an error message because the constant is NOT new to Microsoft Excel 98:

   Sub Test3()
      Application.Dialogs(xlDialogFormulaReplace).Show ,,,2
   End Sub

When you run the Test3 macro, the Replace dialog box is displayed, and By Columns (the second item in the list) appears in the Search list.

REFERENCES

To find more information about built-in constants in Microsoft Excel 98, follow these steps:

1. In the Visual Basic Editor, display the Object Browser (On the View

   menu, click Object Browser).

2. In the list of libraries, click Excel.

3. Type "xldialog" (without the quotation marks) in the box below the

   list of libraries, and then press RETURN.

The list of built-in dialogs is displayed in the Search Results pane.

Additional query words: XL98

Keywords          : kbprg kbdta OffVBA xlmac 
Version           : MACINTOSH:98
Platform          : MACINTOSH
Issue type        : kbprb

Last Reviewed: May 18, 1999