Нужен макрос удаляющий значения в ячейках - VBA

Формулировка задачи:

Подскажите макрос который будет удалять все значения в ячейках после 44 строки и до 15000 ,ячейки которые нужно очистить расположены в столбцах C,D,E,M,N,O,P .И работал он для Листа4 ,запуская его с Листа8. Примерно такой код,только нужно указать с какой строки нужно.

  Sheets("Лист4").Range("C" & i).ClearContents
    Sheets("Лист4").Range("D" & i).ClearContents
    Sheets("Лист4").Range("E" & i).ClearContents
    Sheets("Лист4").Range("M" & i).ClearContents
    Sheets("Лист4").Range("N" & i).ClearContents
    Sheets("Лист4").Range("O" & i).ClearContents
    Sheets("Лист4").Range("P" & i).ClearContents

Решение задачи: «Нужен макрос удаляющий значения в ячейках»

textual
                            Листинг программы 
                        
                            Sheets("Лист4").Range(Cells(45, 3), Cells(15000, 5)).ClearContents
Sheets("Лист4").Range(Cells(45, 13), Cells(15000, 16)).ClearContents