Изменение диапазона графика макросом

[Bomont]

Добрый день господа!

Вот какая незадача. Назначаю диапазон следующим кодом:
ActiveSheet.ChartObjects("Диаграмма 1").Activate
ActiveChart.SeriesCollection(1).Values = "='Хар-ки'!$DD$" & (Sheets("Хар-ки").Range("E3") + Sheets("Хар-ки").Range("C3") - 1) & ":$DD$" & Sheets("Хар-ки").Range("E2")
    ActiveChart.SeriesCollection(1).XValues = "='Хар-ки'!$CX$" & (Sheets("Хар-ки").Range("E3") + Sheets("Хар-ки").Range("C3") - 1) & ":$CX$" & Sheets("Хар-ки").Range("E2")
 
В другом макросе есть строчка ,которая удаляет все исходные строки:
Worksheets("Хар-ки").Rows("" & k5 & ":1048576").Delete Shift:=xlUp

И что получается, эксель видя что удалаюятся все строки удаляет у графика диапазон, а при сохранении выдает предупреждение:
"Формула на этом листе содержит одну или несколько недопустимых ссылок"

Подскажите пожалуйста, что добавить в коде про диапазон, чтобы даже при удалении исходных данных диапазона - эксель не менял назначенный кодом диапазон графика

[_Boroda_]

Самый простой вариант - поставьте в коде после строки с удалением строки с назначением диапазона

[Bomont]

Так и решил )