If you want to remove the chart borders . Try this Macro
Sub remove_borders_from_chart()
Dim cht As Chart
' change chart name here
Set cht = Sheets("Sheet1").ChartObjects("Chart 3").Chart
'Remove border from chart area
cht.ChartArea.Border.LineStyle = xlNone
' remove border from Plot Area
cht.PlotArea.Border.LineStyle = xlNone
End Sub
Sub remove_borders_from_chart()
Dim cht As Chart
' change chart name here
Set cht = Sheets("Sheet1").ChartObjects("Chart 3").Chart
'Remove border from chart area
cht.ChartArea.Border.LineStyle = xlNone
' remove border from Plot Area
cht.PlotArea.Border.LineStyle = xlNone
End Sub
worked , thanks !
ReplyDelete