santiagomf respondió:
Suponiendo que pones el nombre de la página en la celda A1 de la hoja "comprobador", la macro sería: sub irAUnaPagina() on error resume next ' por si acaso la hoja no existe sheets(sheets("comprobador").Range("A1")).select if err<>0 then msgbox "La...