Legend Issue

[albmopar]

I copied a spreadsheet from someone else and now the legend expands into the C3 cell. It works doesn't show on their copy.
Capture.PNG

Sub UPDATEOEECHART()
' UPDATEOEECHART Macro
ActiveSheet.ChartObjects("Chart 2").Activate
    ActiveChart.PlotArea.Select
    ActiveChart.SetSourceData Source:=Sheets("Data History").Range( _
        "A1:A3,B1:AA3,A10:A12,B10:AA12")
    Range("V1").Select
End Sub