Desproteger y proteger libro de excel
Hola:
Como puedo proteger y desproteger otro libro desde otro libro de excel?
O sea abro mi libro de excel "X" y también abro mi libro de excel "Y" y bueno el archivo "Y" me pide contraseña para desproteger y poder hacer cambios, y también como seria para que una vez realizados los cambios vuelva al libro "X" y lo vuelva a proteger?
Este es el código que estoy usando para pasar datos a otro libro de excel
hojita = ComboBox2.Value
Workbooks(librok).Sheets(hojita).Cells(a8).End(xlDown).Select
ActiveSheet.Range("A8").End(xlDown).Select
Dim Ultimafila As Long
Ultimafila = Range("A65536").End(xlUp).Row
Rows(ActiveCell.Row + 1).Insert
libre = Workbooks(librok).Sheets(hojita).Range("A65536").End(xlUp).Row + 1
Workbooks(librok).Sheets(hojita).Cells(libre, 1).Rows(Row + 1).Insert
Workbooks(librok).Sheets(hojita).Cells(libre, 1).Value = TextBox2.Text 'T/C
Gracias
Saludos
Jesús
1 respuesta
Estimada Elsa un placer saludarla, y bueno quiero desproteger el libro para poder hacer los cambios y una vez que haya pasado los datos a la hoja del libro volver a proteger el libro, estoy trabajando con Excel 2013
saludos
Jesús
Bien, entonces en la instrucción de apertura del libro debes incluir la clave, por ej:
Workbooks.Open ("D:\LIBRO_MARPLA.xlsm"), , , , "jesus"
A medida que vayas escribiendo se te irán mostrando los argumentos, así los que no se indican se deja la coma.
Al cerrar el libro no será necesario volverlo a proteger. La protección se mantiene.
