Borrar datos al aumentar el contador

Hola, soy nuevo en esto y no tengo ni idea de cómo hacer macros.
Tengo creado un número de contador después de imprimir, pero no sé como ni donde poner lo siguiente:
Quiero que al aumentar el contador, me borre algunas celdas de la hoja, y que a la vez me guarde una copia antes de eliminar los datos de la misma, en un libro aparte. ¿se puede? Si no me bastaría con que me copiara la hoja en otro Libro, y luego creásemos un botón de esos que creáis vosotros para eliminar el contenido de determinadas celdas.
Yo he creado lo siguiente para la celda L3:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheets("VENTA").Range("L3").Value = Sheets("VENTA").Range("L3") + 1
End Sub
y lo he escrito en ThisWorkbook, ¿hay que escribirlo ahí o en otro sitio?
Por favor, ahora necesito que me digáis que escribo y dónde.
Muchas Gracias.
Por favor, necesito ayuda!!!!!!