Hector Pacheco respondió:
Existe una posible solución aplicando Worksheets("Hoja1"). ProtectContents . Esto le devolvera True si la hoja esta protegida y False si la hoja esta desprotegida. Con el siguiente ejemplo básico podrá ver como funciona el comando. Private Sub...