excel.sub

这是我编写的深圳地铁S335型司机控制器的检测程序

 ExcelConst_xlRowHeader (-4153)
  ""

 ExcelConst_xlRowItem (4)
  ""

 ExcelConst_xlTableBody (8)
  ""


v enum_ExcelEnum_XlFormulaLabel DataType="i" 
 ExcelConst_xlNoLabels (-4142)
  ""

 ExcelConst_xlRowLabels (1)
  ""

 ExcelConst_xlColumnLabels (2)
  ""

 ExcelConst_xlMixedLabels (3)
  ""


v enum_ExcelEnum_XlPageBreak DataType="i" 
 ExcelConst_xlPageBreakAutomatic (-4105)
  ""

 ExcelConst_xlPageBreakManual (-4135)
  ""

 ExcelConst_xlPageBreakNone (-4142)
  ""


v enum_ExcelEnum_XlPageBreakExtent DataType="i" 
 ExcelConst_xlPageBreakFull (1)
  ""

 ExcelConst_xlPageBreakPartial (2)
  ""


v enum_ExcelEnum_XlOrientation DataType="i" 
 ExcelConst_xlDownward (-4170)
  ""

 ExcelConst_xlHorizontal (-4128)
  ""

 ExcelConst_xlUpward (-4171)
  ""

 ExcelConst_xlVertical (-4166)
  ""


v enum_ExcelEnum_XlHAlign DataType="i" 
 ExcelConst_xlHAlignCenter (-4108)
  ""

 ExcelConst_xlHAlignCenterAcrossSelection (7)
  ""

 ExcelConst_xlHAlignDistributed (-4117)
  ""

 ExcelConst_xlHAlignFill (5)
  ""

 ExcelConst_xlHAlignGeneral (1)
  ""

 ExcelConst_xlHAlignJustify (-4130)
  ""

 ExcelConst_xlHAlignLeft (-4131)
  ""

 ExcelConst_xlHAlignRight (-4152)
  ""


v enum_ExcelEnum_XlVAlign DataType="i" 
 ExcelConst_xlVAlignBottom (-4107)
  ""

 ExcelConst_xlVAlignCenter (-4108)
  ""

 ExcelConst_xlVAlignDistributed (-4117)
  ""

 ExcelConst_xlVAlignJustify (-4130)
  ""

 ExcelConst_xlVAlignTop (-4160)
  ""


v enum_ExcelEnum_XlToolbarProtection DataType="i" 
 ExcelConst_xlNoButtonChanges (1)
  ""

 ExcelConst_xlNoChanges (4)
  ""

 ExcelConst_xlNoDockingChanges (3)
  ""

 ExcelConst_xlToolbarProtectionNone (-4143)
  ""

 ExcelConst_xlNoShapeChanges (2)
  ""


v enum_ExcelEnum_XlPivotTableSourceType DataType="i" 
 ExcelConst_xlScenario (4)
  ""

 ExcelConst_xlConsolidation (3)
  ""

 ExcelConst_xlDatabase (1)
  ""

 ExcelConst_xlExternal (2)
  ""

 ExcelConst_xlPivotTable (-4148)
  ""


v enum_ExcelEnum_XlPivotTableMissingItems DataType="i" 
 ExcelConst_xlMissingItemsDefault (-1)
  ""

 ExcelConst_xlMissingItemsNone (0)
  ""

 ExcelConst_xlMissingItemsMax (32500)
  ""


v enum_ExcelEnum_XlPivotTableVersionList DataType="i" 
 ExcelConst_xlPivotTableVersion2000 (0)
  ""

 ExcelConst_xlPivotTableVersion10 (1)
  ""

 ExcelConst_xlPivotTableVersionCurrent (-1)
  ""


v enum_ExcelEnum_XlPTSelectionMode DataType="i" 
 ExcelConst_xlLabelOnly (1)
  ""

 ExcelConst_xlDataAndLabel (0)
  ""

 ExcelConst_xlDataOnly (2)
  ""

 ExcelConst_xlOrigin (3)
  ""

 ExcelConst_xlButton (15)
  ""

 ExcelConst_xlBlanks (4)
  ""

 ExcelConst_xlFirstRow (256)
  ""


v enum_ExcelEnum_XlPivotFieldCalculation DataType="i" 
 ExcelConst_xlDifferenceFrom (2)
  ""

 ExcelConst_xlIndex (9)
  ""

 ExcelConst_xlNoAdditionalCalculation (-4143)
  ""

 ExcelConst_xlPercentDifferenceFrom (4)
  ""

 ExcelConst_xlPercentOf (3)
  ""

 ExcelConst_xlPercentOfColumn (7)
  ""

 ExcelConst_xlPercentOfRow (6)
  ""

 ExcelConst_xlPercentOfTotal (8)
  ""

 ExcelConst_xlRunningTotal (5)
  ""


v enum_ExcelEnum_XlPivotFieldDataType DataType="i" 
 ExcelConst_xlDate (2)
  ""

 ExcelConst_xlNumber (-4145)
  ""

 ExcelConst_xlText (-4158)
  ""


v enum_ExcelEnum_XlRoutingSlipDelivery DataType="i" 
 ExcelConst_xlAllAtOnce (2)
  ""

 ExcelConst_xlOneAfterAnother (1)
  ""


v enum_ExcelEnum_XlRoutingSlipStatus DataType="i" 
 ExcelConst_xlNotYetRouted (0)
  ""

 ExcelConst_xlRoutingComplete (2)
  ""

 ExcelConst_xlRoutingInProgress (1)
  ""


v enum_ExcelEnum_XlSummaryRow DataType="i" 
 ExcelConst_xlSummaryAbove (0)
  ""

 ExcelConst_xlSummaryBelow (1)
  ""


v enum_ExcelEnum_XlSummaryColumn DataType="i" 
 ExcelConst_xlSummaryOnLeft (-4131)
  ""

 ExcelConst_xlSummaryOnRight (-4152)
  ""


v enum_ExcelEnum_XlPageOrientation DataType="i" 
 ExcelConst_xlLandscape (2)
  ""

 ExcelConst_xlPortrait (1)
  ""


v enum_ExcelEnum_XlOrder DataType="i" 
 ExcelConst_xlDownThenOver (1)
  ""

 ExcelConst_xlOverThenDown (2)
  ""


v enum_ExcelEnum_XlPaperSize DataType="i" 
 ExcelConst_xlPaper10x14 (16)
  ""

 ExcelConst_xlPaper11x17 (17)
  ""

 ExcelConst_xlPaperA3 (8)
  ""

 ExcelConst_xlPaperA4 (9)
  ""

 ExcelConst_xlPaperA4Small (10)
  ""

 ExcelConst_xlPaperA5 (11)
  ""

 ExcelConst_xlPaperB4 (12)
  ""

 ExcelConst_xlPaperB5 (13)
  ""

 ExcelConst_xlPaperCsheet (24)
  ""

 ExcelConst_xlPaperDsheet (25)
  ""

 ExcelConst_xlPaperEnvelope10 (20)
  ""

 ExcelConst_xlPaperEnvelope11 (21)
  ""

 ExcelConst_xlPaperEnvelope12 (22)
  ""

 ExcelConst_xlPaperEnvelope14 (23)
  ""

 ExcelConst_xlPaperEnvelope9 (19)
  ""

 ExcelConst_xlPaperEnvelopeB4 (33)
  ""

 ExcelConst_xlPaperEnvelopeB5 (34)
  ""

 ExcelConst_xlPaperEnvelopeB6 (35)
  ""

 ExcelConst_xlPaperEnvelopeC3 (29)
  ""

 ExcelConst_xlPaperEnvelopeC4 (30)
  ""

 ExcelConst_xlPaperEnvelopeC5 (28)
  ""

 ExcelConst_xlPaperEnvelopeC6 (31)
  ""

 ExcelConst_xlPaperEnvelopeC65 (32)
  ""

 ExcelConst_xlPaperEnvelopeDL (27)
  ""

 ExcelConst_xlPaperEnvelopeItaly (36)
  ""

 ExcelConst_xlPaperEnvelopeMonarch (37)
  ""

 ExcelConst_xlPaperEnvelopePersonal (38)
  ""

 ExcelConst_xlPaperEsheet (26)
  ""

 ExcelConst_xlPaperExecutive (7)
  ""

 ExcelConst_xlPaperFanfoldLegalGerman (41)
  ""

 ExcelConst_xlPaperFanfoldStdGerman (40)
  ""

 ExcelConst_xlPaperFanfoldUS (39)
  ""

 ExcelConst_xlPaperFolio (14)
  ""

 ExcelConst_xlPaperLedger (4)
  ""

 ExcelConst_xlPaperLegal (5)
  ""

 ExcelConst_xlPaperLetter (1)
  ""

 ExcelConst_xlPaperLetterSmall (2)
  ""

 ExcelConst_xlPaperNote (18)
  ""

 ExcelConst_xlPaperQuarto (15)
  ""

 ExcelConst_xlPaperStatement (6)
  ""

 ExcelConst_xlPaperTabloid (3)
  ""

 ExcelConst_xlPaperUser (256)
  ""


v enum_ExcelEnum_XlObjectSize DataType="i" 
 ExcelConst_xlFitToPage (2)
  ""

 ExcelConst_xlFullPage (3)
  ""

 ExcelConst_xlScreenSize (1)
  ""


v enum_ExcelEnum_XlPrintLocation DataType="i" 
 ExcelConst_xlPrintSheetEnd (1)
  ""

 ExcelConst_xlPrintInPlace (16)
  ""

 ExcelConst_xlPrintNoComments (-4142)
  ""


v enum_ExcelEnum_XlPrintErrors DataType="i" 
 ExcelConst_xlPrintErrorsDisplayed (0)
  ""

 ExcelConst_xlPrintErrorsBlank (1)
  ""

 ExcelConst_xlPrintErrorsDash (2)
  ""

 ExcelConst_xlPrintErrorsNA (3)
  ""


v enum_ExcelEnum_XlXLMMacroType DataType="i" 
 ExcelConst_xlCommand (2)
  ""

 ExcelConst_xlFunction (1)
  ""

 ExcelConst_xlNotXLM (3)
  ""


v enum_ExcelEnum_XlParameterType DataType="i" 
 ExcelConst_xlPrompt (0)
  ""

 ExcelConst_xlConstant (1)
  ""

 ExcelConst_xlRange (2)
  ""


v enum_ExcelEnum_XlParameterDataType DataType="i" 
 ExcelConst_xlParamTypeUnknown (0)
  ""

 ExcelConst_xlParamTypeChar (1)
  ""

 ExcelConst_xlParamTypeNumeric (2)
  ""

 ExcelConst_xlParamTypeDecimal (3)
  ""

 ExcelConst_xlParamTypeInteger (4)
  ""

 ExcelConst_xlParamTypeSmallInt (5)
  ""

 ExcelConst_xlParamTypeFloat (6)
  ""

 ExcelConst_xlParamTypeReal (7)
  ""

 ExcelConst_xlParamTypeDouble (8)
  ""

 ExcelConst_xlParamTypeVarChar (12)
  ""

 ExcelConst_xlParamTypeDate (9)
  ""

 ExcelConst_xlParamTypeTime (10)
  ""

 ExcelConst_xlParamTypeTimestamp (11)
  ""

 ExcelConst_xlParamTypeLongVarChar (-1)
  ""

 ExcelConst_xlParamTypeBinary (-2)
  ""

 ExcelConst_xlParamTypeVarBinary (-3)
  ""

 ExcelConst_xlParamTypeLongVarBinary (-4)
  ""

 ExcelConst_xlParamTypeBigInt (-5)
  ""

 ExcelConst_xlParamTypeTinyInt (-6)
  ""

 ExcelConst_xlParamTypeBit (-7)
  ""

 ExcelConst_xlParamTypeWChar (-8)
  ""


v enum_ExcelEnum_XlAutoFilterOperator DataType="i" 
 ExcelConst_xlAnd (1)
  ""

 ExcelConst_xlBottom10Items (4)
  ""

 ExcelConst_xlBottom10Percent (6)
  ""

 ExcelConst_xlOr (2)
  ""

 ExcelConst_xlTop10Items (3)
  ""

 ExcelConst_xlTop10Percent (5)
  ""


v enum_ExcelEnum_XlTickMark DataType="i" 
 ExcelConst_xlTickMarkCross (4)
  ""

 ExcelConst_xlTickMarkInside (2)
  ""

 ExcelConst_xlTickMarkNone (-4142)
  ""

 ExcelConst_xlTickMarkOutside (3)
  ""


v enum_ExcelEnum_XlTickLabelPosition DataType="i" 
 ExcelConst_xlTickLabelPositionHigh (-4127)
  ""

 ExcelConst_xlTickLabelPositionLow (-4134)
  ""

 ExcelConst_xlTickLabelPositionNextToAxis (4)
  ""

 ExcelConst_xlTickLabelPositionNone (-4142)
  ""


v enum_ExcelEnum_XlScaleType DataType="i" 
 ExcelConst_xlScaleLinear (-4132)
  ""

 ExcelConst_xlScaleLogarithmic (-4133)
  ""


v enum_ExcelEnum_XlAxisCrosses DataType="i" 
 ExcelConst_xlAxisCrossesAutomatic (-4105)
  ""

 ExcelConst_xlAxisCrossesCustom (-4114)
  ""

 ExcelConst_xlAxisCrossesMaximum (2)
  ""

 ExcelConst_xlAxisCrossesMinimum (4)
  ""


v enum_ExcelEnum_XlAxisGroup DataType="i" 
 ExcelConst_xlPrimary (1)
  ""

 ExcelConst_xlSecondary (2)
  ""


v enum_ExcelEnum_XlAxisType DataType="i" 
 ExcelConst_xlCategory (1)
  ""

 ExcelConst_xlSeriesAxis (3)
  ""

 ExcelConst_xlValue (2)
  ""


v enum_ExcelEnum_XlTimeUnit DataType="i" 
 ExcelConst_xlDays (0)
  ""

 ExcelConst_xlMonths (1)
  ""

 ExcelConst_xlYears (2)
  ""


v enum_ExcelEnum_XlCategoryType DataType="i" 
 ExcelConst_xlCategoryScale (2)
  ""

 ExcelConst_xlTimeScale (3)
  ""

 ExcelConst_xlAutomaticScale (-4105)
  ""


v enum_ExcelEnum_XlDisplayUnit DataType="i" 
 ExcelConst_xlHundreds (-2)
  ""

 ExcelConst_xlThousands (-3)
  ""

 ExcelConst_xlTenThousands (-4)
  ""

 ExcelConst_xlHundredThousands (-5)
  ""

 ExcelConst_xlMillions (-6)
  ""

 ExcelConst_xlTenMillions (-7)
  ""

 ExcelConst_xlHundredMillions (-8)
  ""

 ExcelConst_xlThousandMillions (-9)
  ""

 ExcelConst_xlMillionMillions (-10)
  ""


v enum_ExcelEnum_XlSizeRepresents DataType="i" 
 ExcelConst_xlSizeIsWidth (2)
  ""

 ExcelConst_xlSizeIsArea (1)
  ""


v enum_ExcelEnum_XlChartSplitType DataType="i" 
 ExcelConst_xlSplitByPosition (1)
  ""

 ExcelConst_xlSplitByPercentValue (3)
  ""

 ExcelConst_xlSplitByCustomSplit (4)
  ""

 ExcelConst_xlSplitByValue (2)
  ""


v enum_ExcelEnum_XlMarkerStyle DataType="i" 
 ExcelConst_xlMarkerStyleAutomatic (-4105)
  ""

 ExcelConst_xlMarkerStyleCircle (8)
  ""

 ExcelConst_xlMarkerStyleDash (-4115)
  ""

 ExcelConst_xlMarkerStyleDiamond (2)
  ""

 ExcelConst_xlMarkerStyleDot (-4118)
  ""

 ExcelConst_xlMarkerStyleNone (-4142)
  ""

 ExcelConst_xlMarkerStylePicture (-4147)
  ""

 ExcelConst_xlMarkerStylePlus (9)
  ""

 ExcelConst_xlMarkerStyleSquare (1)
  ""

 ExcelConst_xlMarkerStyleStar (5)
  ""

 ExcelConst_xlMarkerStyleTriangle (3)
  ""

 ExcelConst_xlMarkerStyleX (-4168)
  ""


v enum_ExcelEnum_XlChartPictureType DataType="i" 
 ExcelConst_xlStackScale (3)
  ""

 ExcelConst_xlStack (2)
  ""

 ExcelConst_xlStretch (1)
  ""


v enum_ExcelEnum_XlDataLabelPosition DataType="i" 
 ExcelConst_xlLabelPositionCenter (-4108)
  ""

 ExcelConst_xlLabelPositionAbove (0)
  ""

 ExcelConst_xlLabelPositionBelow (1)
  ""

 ExcelConst_xlLabelPositionLeft (-4131)
  ""

 ExcelConst_xlLabelPositionRight (-4152)
  ""

 ExcelConst_xlLabelPositionOutsideEnd (2)
  ""

 ExcelConst_xlLabelPositionInsideEnd (3)
  ""

 ExcelConst_xlLabelPositionInsideBase (4)
  ""

 ExcelConst_xlLabelPositionBestFit (5)
  ""

 ExcelConst_xlLabelPositionMixed (6)
  ""

 ExcelConst_xlLabelPositionCustom (7)
  ""


v enum_ExcelEnum_XlTrendlineType DataType="i" 
 ExcelConst_xlExponential (5)
  ""

 ExcelConst_xlLinear (-4132)
  ""

 ExcelConst_xlLogarithmic (-4133)
  ""

 ExcelConst_xlMovingAvg (6)
  ""

 ExcelConst_xlPolynomial (3)
  ""

 ExcelConst_xlPower (4)
  ""


v enum_ExcelEnum_XlTickLabelOrientation DataType="i" 
 ExcelConst_xlTickLabelOrientationAutomatic (-4105)
  ""

 ExcelConst_xlTickLabelOrientationDownward (-4170)
  ""

 ExcelConst_xlTickLabelOrientationHorizontal (-4128)
  ""

 ExcelConst_xlTickLabelOrientationUpward (-4171)
  ""

 ExcelConst_xlTickLabelOrientationVertical (-4166)
  ""


v enum_ExcelEnum_XlLegendPosition DataType="i" 
 ExcelConst_xlLegendPositionBottom (-4107)
  ""

 ExcelConst_xlLegendPositionCorner (2)
  ""

 ExcelConst_xlLegendPositionLeft (-4131)
  ""

 ExcelConst_xlLegendPositionRight (-4152)
  ""

 ExcelConst_xlLegendPositionTop (-4160)
  ""


v enum_ExcelEnum_XlEndStyleCap DataType="i" 
 ExcelConst_xlCap (1)
  ""

 ExcelConst_xlNoCap (2)
  ""


v enum_ExcelEnum_MsoShapeType DataType="i"