Convertir el valor de texto en un Hipervínculo
Pretendo que al hacer clic en el valor de texto "(Si quiere leerlas haga clic aquí)" del código que inserto a continuación, se abra al UserForm llamado "Frm_AyudaYRecomendaciones".
Sheets(8).Visible = True
Sheets(8).Select
Sheets(8).Unprotect
Range("A1000000").End(xlUp).Offset(2, 2).Select
ActiveCell.Value = "* QUIZÁS SEA RECOMENDABLE QUE LEA EL APARTADO C) DE LAS MEDIDAS ESPECIALES DE SEGURIDAD QUE FIGURAN EN EL USERFORM DE 'AYUDA Y RECOMENDACIONES'"
ActiveCell.Offset(1, 0).Value = "(Si quiere leerlas haga clic aquí)"
Sheets(8).Protect
Sheets(8).Visible = False
Sheets(1).Select
1 Respuesta
Respuesta de Rafael Vera
1
