>this.ExcObj = CreateObject("EXCEL.APPLICATION") >if type('this.ExcObj') <> 'O' > && There are differing opinions on the best way to test > && an object. >endif > >with this.ExcObj > .Application.Visible = .F. > .Application.DisplayAlerts = .F. > .Workbooks.Add >endwith >>