VBA Code for deleting contents of multiple lines

hi,

I would like to clear the contents of rows 5,9,15,20,29,40 in my excel spreadsheet. How can I achieve this through a VBA code?

Thanks