Dim instance As IFeatureManager
Dim BaseName As String
Dim ProgId As String
Dim MacroMethods As String
Dim ParamCount As Integer
Dim ParamNames As String
Dim ParamTypes As Integer
Dim ParamValues As String
Dim DimCount As Integer
Dim DimTypes As Integer
Dim DimCountValues As Double
Dim EditBody As Body2
Dim IconCount As Integer
Dim IconFiles As String
Dim Options As Integer
Dim value As Feature
value = instance.IInsertMacroFeature2(BaseName, ProgId, MacroMethods, ParamCount, ParamNames, ParamTypes, ParamValues, DimCount, DimTypes, DimCountValues, EditBody, IconCount, IconFiles, Options)
|