Hello VFP world,
I am developing an application that when automatically run will be unattended...
oExcel=CREATEOBJECT("Excel.Application")
With oExcel
.DisplayAlerts= .F.
.WorkBooks.Open(cSpreadsheet)
.Sheets("AFO").Select()
...
Interaction is currently required due to LINKS among spreadsheets...
The Workbook contains links to other data sources.
- To update all linked information, Click Yes.
- To keep the existing information, click No.
|Yes| |No|
I would prefer 'No' at this time, but it does not matter here!
How may the app be provided an answer?
FYI,
Part...Ex8 mem dump follows ---
C "ActivateMicrosoftApp"
C "Method"
C "(Index as XlMSApplication)"
C "ActiveCell"
C "PropertyGet"
C "(RowIndex as Variant, [ColumnIndex as Variant])"
C "ActiveChart"
C "PropertyGet"
C "ActivePrinter"
C "PropertyGet"
C "ActivePrinter"
C "PropertyPut"
C "ActiveSheet"
C "PropertyGet"
C "ActiveWindow"
C "PropertyGet"
C "ActiveWorkbook"
C "PropertyGet"
C "AddChartAutoFormat"
C "Method"
C "(Chart as Variant, Name as String, [Description as Variant])"
C "AddCustomList"
C "Method"
C "(ListArray as Variant, [ByRow as Variant])"
C "AddIns"
C "PropertyGet"
C "(Index as Variant) as AddIn"
C "AlertBeforeOverwriting"
C "PropertyGet"
C "AlertBeforeOverwriting"
C "PropertyPut"
C "AltStartupPath"
C "PropertyGet"
C "AltStartupPath"
C "PropertyPut"
C "AnswerWizard"
C "PropertyGet"
C "Application"
C "PropertyGet"
C "ArbitraryXMLSupportAvailable"
C "PropertyGet"
C "AskToUpdateLinks"
C "PropertyPut"
C "AskToUpdateLinks"
C "PropertyGet"
C "Assistant"
C "PropertyGet"
C "AutoCorrect"
C "PropertyGet"
C "AutoFormatAsYouTypeReplaceHyperlinks"
C "PropertyPut"
C "AutoFormatAsYouTypeReplaceHyperlinks"
C "PropertyGet"
C "AutoPercentEntry"
C "PropertyGet"
C "AutoPercentEntry"
C "PropertyPut"
C "AutoRecover"
C "PropertyGet"
C "AutomationSecurity"
C "PropertyPut"
C "AutomationSecurity"
C "PropertyGet"
C "Build"
C "PropertyGet"
C "COMAddIns"
C "PropertyGet"
C "(Index as Variant) as COMAddIn"
C "Calculate"
C "Method"
C "CalculateBeforeSave"
C "PropertyPut"
C "CalculateBeforeSave"
C "PropertyGet"
C "CalculateFull"
C "Method"
C "CalculateFullRebuild"
C "Method"
C "Calculation"
C "PropertyPut"
C "Calculation"
C "PropertyGet"
C "CalculationInterruptKey"
C "PropertyPut"
C "CalculationInterruptKey"
C "PropertyGet"
C "CalculationState"
C "PropertyGet"
C "CalculationVersion"
C "PropertyGet"
C "Caller"
C "PropertyGet"
C "CanPlaySounds"
C "PropertyGet"
C "CanRecordSounds"
C "PropertyGet"
C "Caption"
C "PropertyPut"
C "Caption"
C "PropertyGet"
C "CellDragAndDrop"
C "PropertyPut"
C "CellDragAndDrop"
C "PropertyGet"
C "Cells"
C "PropertyGet"
C "(RowIndex as Variant, [ColumnIndex as Variant])"
C "CentimetersToPoints"
C "Method"
C "(Centimeters as Number) as Number"
C "Charts"
C "PropertyGet"
C "(Index as Variant) as Object"
C "CheckAbort"
C "Method"
C "([KeepAbort as Variant])"
C "CheckSpelling"
C "Method"
C "(Word as String, [CustomDictionary as Variant], [IgnoreUppercase as Variant]) as Logical"
C "ClipboardFormats"
C "PropertyGet"
C "Columns"
C "PropertyGet"
C "(RowIndex as Variant, [ColumnIndex as Variant])"
C "CommandBars"
C "PropertyGet"
C "(Index as Variant) as CommandBar"
C "CommandUnderlines"
C "PropertyPut"
C "CommandUnderlines"
C "PropertyGet"
C "ConstrainNumeric"
C "PropertyPut"
C "ConstrainNumeric"
C "PropertyGet"
C "ControlCharacters"
C "PropertyPut"
C "ControlCharacters"
C "PropertyGet"
C "ConvertFormula"
C "Method"
C "(Formula as Variant, FromReferenceStyle as XlReferenceStyle, [ToReferenceStyle as Variant], [ToAbsolute as Variant], [RelativeTo as Variant])"
C "CopyObjectsWithCells"
C "PropertyPut"
C "CopyObjectsWithCells"
C "PropertyGet"
C "Creator"
C "PropertyGet"
C "Cursor"
C "PropertyGet"
C "Cursor"
C "PropertyPut"
C "CursorMovement"
C "PropertyPut"
C "CursorMovement"
C "PropertyGet"
C "CustomListCount"
C "PropertyGet"
C "CutCopyMode"
C "PropertyGet"
C "CutCopyMode"
C "PropertyPut"
C "DDEAppReturnCode"
C "PropertyGet"
C "DDEExecute"
C "Method"
C "(Channel as Number, String as String)"
C "DDEInitiate"
C "Method"
C "(App as String, Topic as String) as Number"
C "DDEPoke"
C "Method"
C "(Channel as Number, Item as Variant, Data as Variant)"
C "DDERequest"
C "Worksheets"
C "PropertyGet"
C "(Index as Variant) as Object"
C "_Default"
C "PropertyGet"
C "_Evaluate"
C "Method"
C "(Name as Variant)"
C "_Run2"
C "Method"
C "([Macro as..." 611 bytes
Edgar L. Bolton, B.S. B.B.A.