completely clear all rows after date

Is there some vba code that will completly remove all rows after a certain date in A column, the date is in B2. Dates are listed in A column.

When i say completely remove i mean delete, clear colours, remove borders,etc etc

Thanks