Macro para seleccionar y mover celdas concretas

Hola,
Quería pedir ayuda para crear una macro, ya que es la primera que hago.
Quiero seleccionar un rango de celdas según estos criterios: debe abarcar todas las filas cuya A1 coincida con la celda activa; debe incluir también las tres columnas adyacentes (B, C y D); por último debería cortar y pegar en una celda-destino concreta.
No sé si es muy complicado lo que pretendo, pero agradezco cualquier ayuda.
Graciaaaas!!!!