VBA to delete rows starting from row 18 and delete data in one column from row 17

Hello,

I wanted to ask a simple Vba code that helps me delete all the rows that have data starting from rows 18 and delete all data in column A starting from cell A17.