Setting Extrude end condition... help!

I have this section of code I am trying to modify,

Set swPartDoc_TM = TubeModel
Set swFeat = swPartDoc_TM.FeatureByName("E" & EndNum & "M"& CutNum & "_miter")
Set SwFeatDef = swFeat.GetDefinition
If CutData(EndNum, CutNum).ThruType = 1 Then
SwFeatDef.SetEndCondition True, swEndCondThroughNext
SwFeatDef.SetEndCondition False, swEndCondThroughNext
Else
SwFeatDef.SetEndCondition True, swEndCondThroughAll
SwFeatDef.SetEndCondition False, swEndCondThroughAll
End If
stat_b = swFeat.ModifyDefinition(SwFeatDef, TubeModel, Nothing)

And instead of the swEndCondThroughNext, I want it to be "Up ToVertex" but not sure how to set that. this is the code that is runif I do a macro record on what I want to do.

Set swApp = Application.SldWorks

Set Part = swApp.ActiveDoc
Set SelMgr = Part.SelectionManager
boolstatus = Part.Extension.SelectByID2("E1M1_round","BODYFEATURE", 0, 0, 0, False, 0, Nothing, 0)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("Point1@Convergence_Pts","EXTSKETCHPOINT", -0.2032, 0, 0, True, 1, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Point1@Convergence_Pts","EXTSKETCHPOINT", -0.2032, 0, 0, True, 2, Nothing, 0)
Part.SelectionManager.EnableContourSelection = 0
End Sub

Again, I don't know how to get it to work correctly. Any help wouldbe wonderful!

Thanks

SolidworksApi macros