Angelito junino

Esta es la macro: Option Private Module Option Explicit Public Rf1aP As Range Public Const Rff1aP As String = "A1:JZ1" 'borra WWW OK Public Rf2aP As Range Public Const Rff2aP As String = "A2:K2" 'rg copiar los encabezados en el nuevo Ap OK se debe...