¿Como puedo solucionar error 9 en tiempo de ejecución en vba?
Adjunto imagen:
Gracias por la colaboración. Soy neófito en esto y necesito proteger unos archivos. Ya que si utilizo la opción de restringir formato de word. Si me inhabilita casi todo. Sin embargo al subrayar y hundir control + C copia el texto común y corriente.
De hecho utilice un código proporcionado por una usuaria de esta comunidad a saber:
Private Sub Document_Open()
CommandBars("Standard").Controls(3).Delete
CommandBars("Standard").Controls(5).Delete
CommandBars("Standard").Controls(7).Delete
CommandBars("Standard").Controls(7).Delete
CommandBars("File").Controls(4).Delete
CommandBars("File").Controls(4).Delete
CommandBars("File").Controls(4).Delete
CommandBars("File").Controls(11).Delete
End Sub
Y el que sigue en el evento Close del mismo.
Private Sub Document_Close()
CommandBars("Standard"). Reset
CommandBars("File"). Reset
End Sub
1 respuesta
Galvilo: Revisa los números que tienes entre paréntesis, porque quizá estás haciendo referenci a alguno que no existe.
.......Controls(xx).Delete
Ya me contarás. Saludos >> Jacinto
Hola
Primero que todo muchas gracias por tu respuesta.
segundo, he intentado hacer de todo para averiguar cuales son los números de esos botones, ya que supongo que a medida que van saliendo versiones de microsot word puede cambiar la numeración de los botones. pero en realidad no he dado con la solución. no se como hacerlo.
Te agradezco si me puedes colaborar.
Galvilo: La verdad es que no sé como ayudarte, salvo sugerirte que si como dices el Código es de una usuaria de éste foro, quizá sería bueno que le hicieras la pregunta de forma directa a ella, que seguro sabe como ayudarte y de un modo efectivo. Saludos >> Jacinto
