Get rid of graphic border

I need to get rid of borders of my graphs, but without appeal to "shapes". To understand my problem easier, here is a part of my code:

RangeString = "AA5:AB" + CStr(LastRow + 4)
Set rng = .Range(RangeString)
'Create a chart
Set cht = ActiveSheet.ChartObjects.Add(Left:=Worksheets(NewSheet).Range(RefCellPosGraf1).Left, Width:=GraphWidth, Top:=Worksheets(NewSheet).Range(RefCellPosGraf1).Top, Height:=GraphHeight)
cht.Chart.SetSourceData Source:=rng
cht.Chart.ChartType = xlPie
cht.Chart.ChartStyle = Worksheets("Config").Range("B62").Value
cht.Chart.HasTitle = True
cht.Chart.PlotVisibleOnly = False
cht.Chart.ChartTitle.Text = "MdC por segmento"
cht.Chart.PlotVisibleOnly = False

Would it be possible to fit in a cht.Chart.Border = False or something like that?

Thanks dflak, your solution worked just fine!
The range question is due to the fact that this is an old program that I am re-looking. Since then I've learned better ways to handle the issue. And yes, the range is of dynamic data.
Many thanks again!: