convert Excel into vb

[cmdolcet69]

How can I convert this code into vb code?


ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.Axes(xlCategory).Select
With Selection.Border
.Weight = xlHairline
.LineStyle = xlAutomatic
End With
With Selection
.MajorTickMark = xlOutside
.MinorTickMark = xlNone
.TickLabelPosition = xlLow
End With

 

[DIOS]

How can I convert this code into vb code?

    ActiveSheet.ChartObjects("Chart 1").Activate
    ActiveChart.Axes(xlCategory).Select
    With Selection.Border
        .Weight = xlHairline
        .LineStyle = xlAutomatic
    End With
    With Selection
        .MajorTickMark = xlOutside
        .MinorTickMark = xlNone
        .TickLabelPosition = xlLow
    End With

that is VB6 code just call the correct Excel objects to initialize. Go
to www.planet-source-code.com and look up Excel. besides this
newsgroup is for .NET, not classic vb.

AGP