ࡱ>    9:" !#$%&'()*+,-./012345678TQ<=>?@IBCDEFGH;JKLMNOPRSUVRoot Entry Fӻbubyvv @Workbook_VBA_PROJECT_CUR" *KvKvVBA*KvtKv \pJocelyn Ba= ThisWorkbook=1!8X@"1Arial1Arial1Arial1Arial1.Times New Roman1Arial""#,##0;\-""#,##0""#,##0;[Red]\-""#,##0""#,##0.00;\-""#,##0.00#""#,##0.00;[Red]\-""#,##0.005*0_-""* #,##0_-;\-""* #,##0_-;_-""* "-"_-;_-@_-,)'_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-=,8_-""* #,##0.00_-;\-""* #,##0.00_-;_-""* "-"??_-;_-@_-4+/_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-                + ) , *  @ @      Inputs`>Sheet1,Sheet 2Sheet 27"MyName'Stock Description Setup'!F5:F98"MyRange'Stock Description Setup'!F5:F9> "named_range_2'Stock Description Setup'!F5:F9> "named_range_3'Stock Description Setup'!F5:F9' named_range_4;" DwellingsFlatsHousesFlat 1House 34Flat 5 Bungalow 1Flat 7House 31 Bungalows Flats (A3:A9)Houses (A3:A9)Bungalows (A3:A9)Flat 6 Bungalow 2 Bungalow 3L \cc   t  dMbP?_*+%MAGFA-AccuSet v52.3S 4dA4PRIV0''''P4(7" d??U} I} }  } I                 i#!SZ@'$@Z@@"N@Bi$!SZ@'$@Z@@"N@B  i$!SZ@'$@Z@@"N@Bi$!SZ@'$@Z@@"N@B  i$!ySZ@'$@Z@@"N@Bi$!SZ@'$@Z@@"N@B|B>@d7 Sheet1 ThisWorkbook Class1QSheet1%I_VBA_PROJECT7I  !"#$&'()*+,-./012345689:;<=>?ABCDEFGHIJKLMNOPRTUVWXYZ\]^`abd;`#N?N,S@FE4I2pp xME (SLSS<N0{00020819-0000-0000-C000-000000000046}(%@h % %Xp@@TTxAttribute VB_Name = "ThisWorkbook" Bas0{00020P819-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2<ZCv$jgSMOD*=h8+3qoO 6h?xME (SS S<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}(%` %h`p8BJxAttribute VB_Name = "Cla@ss1" Bast0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |GlobaBlSpacFalse dCre atablPr@edeclaIdCExposeTemplateDeriv%Customiz E<jCD# HVɮ@#Fk F6'3~u LPVѥ =|OpxC]f20mf8*B[|0 as bBooleanByRef*currency=DimDElseEelseifOexitPexplicitQfRFalseTFor^Goto_ifbInjIntegerkIslLBoundpletsLineNameNewNotnothingnulloptionPreservePublicReadReDimRemResumereturnSetstopSubThenToTrueUBoundVariantWithWriteExcel+VBAWin16~Win32MacVBA6#Project1 stdole` VBAProjectOfficeu ThisWorkbook| _EvaluateSheet1Sheet2Sheet3Module1b TheSheetNamesH CollectionWTheTemplateFilenametest4ReadAndObeyFileDFilenamej ForReading8fso CreateObject OpenTextFile InitialiseM AtEndOfStreamTrim@ReadLine ObeyCommand; CommandLineCommand] CommandArgsSpacePoszRight CreateWorkbookFromArgsCreateSheetFromArgsPutFormulaFromArgs PutArrayFormulaFromArgsQPutStyleFromArgs TemplateFromArgsMsgBoxRCreateWorkbookRNewBook,WorkbookkFirstNewSheetName*LLastUnwantedSheetName WorkbooksBAddrSaveAsf; WorksheetsCount0vDeletexSheets i` CreateSheet$9 SheetName6BangPosU(EqPos CellAddressStringY FormulaString. PutFormulaOptionsSetDropdownFromCommandArgs# OptionsString^ SelectionZ Validation xlValidateListĤ AlertStyle7xlValidAlertStopOperatork xlBetweenkFormula1 IgnoreBlankRInCellDropdown9 InputTitleA ErrorTitle( InputMessageR\ ErrorMessagef ShowInput ShowError8OSetCommentFromCommandArgsv PutCommentY CommentHs AddCommentVisibleInStreamBRe^ CallProlog=_B_var_FunctionOCommunicationFileNameaTrans kindCommunicationDirRCreateReadyForPrologFlag:t ForWritinge9TellPrologToResume"< _B_var_SubOpenFileToPrologN InFilenameO OutFilenamer OutStream[CloseFileToProlog:Tell)TellPrologToResumR_B_var_TellPrologToResum WaitForPrologWAwaitReadyForExcelFlag FileExistsSleepOpenFileToExcelfnameRxoReadAndObeyCommand FileToExcelrCloseFileToExcelXhIOpenFileToExcel<SelectionChangen_B_var_Options+ _B_var_SleepdwMSbkernel32_ _B_var_Set _B_var_LetkInitialiseCommunication' WriteLineemsbox _B_var_msboxmsgQsj_B_var_smsgbocR _B_var_msgboc+Module2cDumpSheetByName DumpSheetDump DumpSheets UsedRangeȉXMaxColumnsp9 EntireColڦ Intersect1Cells EntireColumn DumpColumnm:ColumniYMaxRowsUMaxSegs>Segments. SegmentsIndexColumnToSegmentsJDumpColumnSegmentsDumpColumnSegmentYSegmenteContentsIfListADumpSegmentContentDumpColumnSegmentContentListݣRemoveϱContents=VarTypepvbString`eReplacefyl NextSegmentȹRecurColumnToSegment"Value1Value2 ThisSegmentCellAtExtendRepetitionSegment7 ExtendListSegmentZ|ValueYYUs_FinalValueSoFar! FormulaR1C1SvalueKaXList*followedod_B_var_followed;Module3dModule4eMacro1N ActiveWindow+Top5sun _B_var_sunɒUnhideCellsInSheet9_B_var_UnhideCellsInSheeta _B_var_forjLUsed _B_var_UsedHidden] EntireRowSheety UnhideCellsInSheetSheet_B_var_UnhideCellsInSheetSheetzTestDump1Macro2N WindowState| xlMinimized2WindowsdActivate|xlNormalL DumpAllSheets _B_var_nameXDumpAllSheetsExcept SheetNames _B_var_SheetNames DumpSheetsToStreamb _B_var_LBound _B_var_UBounddDumpSheetToStreamDumpSheetsToFileoAllSheetsExceptB_B_var_Worksheet_B_var_DumpSheetByName NoOfSheets _B_var_Constg_B_var_Integer ExcludedNames'v SheetsToDumpxUnhideCellsInSheets#privat _B_var_privat{sArrayContainsName݋_B_var_VariantNamesο _B_var_ReDimja NextSheet\Q _B_var_SheetHTotalNoOfSheets~_B_var_SheetsToDumpExcludedNamesCopyR_B_var_ExcludedNamesCopy!nexl_ xlWorksheet, SheetsNamed' SheetsNames'LowsHighz _B_var_HighLLBound_B_var_LLBoundgConv}ConvertFormulaxlA1 HandleError;FinishedR1C1PartMErroNumber- Description  _B_var_ObjectjricolHvmvarttype_B_var_varttypeCellType$VolatileIsEmpty IsText IsLogical|IsErrzIsDate2 IsNumeric$* HasFormulaCell ThenCellAt%msgbo _B_var_msgbo|_B_var_contentsaAllSheetsDumpable`AllSheetsDumpableExcept8`Module5fSetTimerRHWnd/nIDEventFuElapsea lpTimerFuncuser32* KillTimeriTimerID& TimerSeconds StartTimerF TimerProc9iEndTimerm3uMsgdwTimeriExecuteYThe'Thereiarettwo7you Auto_OpenV wb_OptionsxlBetweenR_B_var_Formula1RefersTo NameRangeSetNamedRangeFromCommandArgsRangeAddressStringà _B_var_WithY_B_var_CellAddressString'Cdropdown_options dropdown_name{ NameOrOptionsn_B_var_CellRangem OptionsOrNameDInterfaceWorkbookBEnviron,_B_var_Environ/ EtfFileName^AutoFit&  FitAllColumnsAdjustAllColumnWidthsFitAllColumnsInSheetԌ AdjustCiolumn9AdjustColumnWidthswsSheet wSheetslwSheet0"AdjustAllColumnWidthsAndRowHeights*BFitAllColumnsAndRowsInSheetR _B_var_wSheetm_B_var_FitAllColumnsInSheetGroupRowsFromCommandArgslCommandArgsCaseL#SetRowInsertionAboveFromCommandArgs)g^ss'_ TakeAddressddelimsDelimPos AddressStringnrestDeliJODel/De\d[StrinT`Stri^5StrSt(__B_var_Formula\ _B_var_Rest% SheetName1  SheetName2 CellAddressString1CellAddressString2Group GroupRowsV^_B_var_GroupRowsg SubPrivate  CellRange1 CellRange2Gro ElseDelimPos|GroupColumnsFromCommandArgs\ GroupColumnsiTifSheetu_B_var_ifSheet ColumnWidthInsertRowBelowRowNoCellRangeToInsertAbove%CellRangeToCopydCopyƿInsertrShiftxlDown0D PasteSpecialKPastexlPasteFormatsxlPasteFormulas5SetRowInsertionAbovejSetSheetEventHandlerBClass1+_B_var_SetRowInsertionAboveupcreatingCreatingWorkbook]WorkbookFinishedstdole h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\syst em32\e2.tlb#OLE Automation`EOffDicEOficEE2DF8D04C-5BFA-101B-BDE5EAAC42Egram Files\CommonMicrosoft Shared\OFFICE11\MSO.0DLL#M 1@1.0 Ob LibraryKEThisWorkbookGTisWrkbUo 2 QHB1BxB,!;`"B+BB|Class1G Cza@#s1ZH2N v(NSheetDS@eutFOCCIcDI9FRowsAutoFit "AdjustAllColumnWidthsAndRowHeightsFitAllColumnsAndRowsInSheetGroupRowsFromCommandArgs #SetRowInsertionAboveFromCommandArgs group_rows &row_insertion_above'DFۻv iG F_'ɪJN%kDF Worksheet'PC yr[QH 2 1 TakeAddress GroupRowsGroupColumnsFromCommandArgs GroupColumns group_columnstestInsertRowBelow Sheet1 Sheet2 Sheet3 A PastePasteSpecialClass1SetSheetEventHandler , J$-DF/$*{bMPM1ǵ-EnableEvents%2BW ~0TUAm''L`N& 9 M R߽\IaりFormulaInstance {Take a{bSplitAtGetNextCurlyInsert {} } bGetNextCurlyInsert: right curly bracket not found a{b}c|!hDk. "SL|ٗg|o:4K0xKYdJov^DvD sOOFjF"]ժG,x CurlyInstance a << >> {} {} x{a}b{c}y SplitFirst abc ab 8SplitFirst: s is zero-length BUG  Vi V VV S SS :CurlyInstance: illegal kind ' ' in '[gYtH:Es}N[N`5CR0}<ƒr9B+Ft[I-L2V[zv cPA}z SiQXG7%&OK##gCr㋯^IeDQ?Ը !K@%VFUKO=F Reshapetest2Rebase (Scripting.Dictionary foo barAddItem fo  IntegerBindingsLookup existsIntBindingsNewIntBindingsUpdateIntBindingsLookupVariableInstanceSubscriptInstanceUK<3>8Dname %SetRowInsertionAffectsFromCommandArgs *row_insertion_affectsMapNew MapUpdate MapLookupyġ@. o%3& N)#׾:RbLPDpUmC 8VariableInstance: variable ' ' not found xy yx x y null {St1,} 0Reshape: illegal shape 'dict 00)rtxF* 00)*\x_kbpp* 00)xbject Li*  K*y rU ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~U QD@   1 JIYi ThisWorkbookModule5Sheet2Sheet3Module1Module2Module3Module4 VBAProjectF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA  90F4C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXEExcel A@0FCellTypebugC:\WINDOWS\system32\stdole2.tlbstdole  QPL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLLOffice q`SetTimer user32 SetTimer  )p KillTimer KillTimer   StartTimerEndTimer TimerProc   Auto_OpenReadAndObeyFile Initialise ObeyCommandCreateWorkbookFromCommandArgsCreateWorkbookSetSheetFromCommandArgsSetFormulaFromCommandArgs PutFormulaSetArrayFormulaFromCommandArgsPutArrayFormulaSetStyleFromCommandArgsPutStyleSetTemplateFileFromCommandArgsSetDropdownFromCommandArgs PutDropdownSetCommentFromCommandArgs PutCommentSetNamedRangeFromCommandArgs NameRange  UnquoteSheetNameIfNecessary   :c:\windows\temp\excelsior.etf 4Scripting.FileSystemObjectOpenTextFileAtEndOfStreamReadLine  CloseVBE6.DLL i  i (gĤIx8<gĤIx8<i %f workbook sheet formula array_formula style template dropdown_options options dropdown_name name comment Illegal command ix H ii h EXCELSIOR_TEMP ik  iS FFF DeleteFFFName ! = RangeFF '/DF+?ݮ?LRWmF/@ADFWorkbook @g i  \excelsior.etfAdjustAllColumnWidthsFitAllColumnsInSheetF"SetRowsAffectedBy+=h8+3qJHzG*<'d*=h8+3qX]%KE,W=!=h8+3qClassPgv3+3o VBInternal A3 i38   %SetRowInsertionTriggerFromCommandArgs   *row_insertion_triggerSetRowTriggers s1 s2 {Vs1} s3 &a{Vs1}b{Vs2}c{Vs3}d Doing Done a{St,s1,s2}b a{St,s1,s2,}bSubscriptListToVector 1,yz 1,2, 1,2,3,test3 {St2,1,} {St3,1,1,} {St3,s1,s2,}devar i1  in Sheet1!A1 A1SubscriptInstanceAsStringSubscriptInstanceAsRangegcdG晔1qs岣FBG( B6PBiLJe EGj%Bb25WLׄttStringTo2IntVector {1,2,} {1,} {3,4,}SetEquations MakeEquationttt "t=1:10 u=2:20 t+u xvar : x1low x1high yvar y1low y1high RHS $undefined$ Locals Vars VarsLow VarsHigh7ϻ}!BdG6 D:k%#ۢNHFFUFo J.ݳKV5\SCN1O5؝$jgSMODSheet6oO 6h?StringToResheeting 8x {1,0,} {2,3,} 'Sheet1!A17' 8x {1,0,} {2,3,} 'Sheet1'!A17 RunDoWorkbookCommand DoWorkbook :c:\windows\temp\spreadlet.etfN?N,S@E4I2pp Sheet1 HVɮ@#Fk6'3rgHA#Ï>.OKޮwx c:\demo\flat.etf?/wYKK >l\bwLJ%_TnGLAT}{SE+k *Sheet7AddFlatAddHouseAddFlatX "c:\demo\house.etf AddBungalow AddHouseX AddBungalowXAddJoke (c:\demo\bungalow.etf c:\demo\joke.etf "c:\demo\flatx.etf $c:\demo\housex.etf *c:\demo\bungalowx.etfAddJoke2 "c:\demo\joke2.etfWrU~~~~~~s HWndnIDEventuElapse lpTimerFuncuMsgdwTimercFilename CommandLineInStream CommandArgs SheetNameCellAddressString FormulaStringArrayRangeAddressString StyleNameKind OptionsOrNameCommentRangeAddressStringName Y Y9SheetwSheet Y1(sdelim AddressStringRestfgDelimRowNoprepostficurlykindrestv1shapev2v1lowv2offsetbvarvalue subscriptbindingsnamemkey 338 YH subscriptlistSheetedAddressStringvrest_of_equation IX%ThisWorkbookThisWorkbookClass1Class1Sheet1Sheet1ID="{0D5D3428-9853-4E8B-B870-0713FD6C4D8A}" Document=ThisWorkbook/&H00000000 Class=Class1 Document=Sheet1/&H00000000 Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="C8CA1EA422A422A422A422" DPB="4A489C9C1F9D1F9D1F" GC="CCCE1A261EA91FA91F56" [Host Extender Info] &H00000001={3832D640-PROJECT SSummaryInformation([DocumentSummaryInformation8_CompObjcmCF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=88, 116, 641, 528, C Class1=110, 145, 663, 557, C Sheet1=0, 0, 0, 0, C Oh+'0@HXh JocelynJocelynMicrosoft Excel@$cX@rKv՜.+,0 PXd lt|  Sheet1  Worksheets F!Microsoft Office Excel WorksheetBiff8Excel.Sheet.89q