This example puts a border around the chart area and the plot area of Chart1.
With Charts("Chart1")
.ChartArea.Border.LineStyle = xlDashDot
With .PlotArea.Border
.LineStyle = xlDashDotDot
.Weight = xlThick
End With
End With