Thread: Dialog Box
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
FSt1 FSt1 is offline
external usenet poster
 
Posts: 3,942
Default Dialog Box

hi,
define it with a dim

sub test()
dim x as application

Regards
FSt1

" wrote:

Hello

I have a question on the open file dialog box:
the code is the following:

Sub test()

OpenBoolean = Application.Dialogs(xlDialogOpen).Show

Set x = CreateObject("Excel.Application")
OpenBoolean = x.Application.Dialogs(xlDialogOpen).Show

End Sub

The first line works fine however there is a problem with the third
line: I get the error "object not definied"

Can anyone help me?

Many thanks