martayara

Hola, en este mismo foro encontré esta macro que es justo lo que necesito, pero necesito modificar una cosa a ver si me podéis ayudar por favor. Esta es la macro: Sub Aviso() Range("H1").Select actual = ActiveCell.Value Range("D2").Select While...