Stopping "Link Worksheets?" message box (using automation)

  • Thread starter Thread starter pw
  • Start date Start date
P

pw

Hi,

I am using Visual FoxPro 7 and Excel 2000. I am using GetObject
(code below) to copy a range of cells to a table. When the program is
running, the user is asked if he/she wants to link the worksheets.

How can I stop this and all message boxes. I can not find anything
about parameters, etc... in the Excel or VFP help files.

Thanks,

-paul w


*--
loWorkBook = GetObject('&lsheetloc')

With loWorkBook
.Sheets(2).Select
EndWith

With loWorkBook.ActiveSheet.Range("A2:A65536")
.NumberFormat = "Mm/Dd/Yyyy"
EndWith

loWorkBook.Close(.T.)

Append From '&lsheetloc' Type XL8 SHEET "PortfolioReturn"

pw
livingston,montana
please use "pw at williamsonenterprises dot com" for e-mail
thanks
 
Paul,

I am mot sure but this might help:

Application.DisplayAlerts = False/True

John

Okay John! I will try and do the same in Visual FoxPro (I am
primarily developing in Access 97 these days so I should be able to
figure out the syntax conversion!).

Thanks!

-pw






pw
livingston,montana
please use "pw at williamsonenterprises dot com" for e-mail
thanks
 
Back
Top