Macro que copia información en otro libro
Buenas,
Tengo el siguiente código:
Sub GuardaMinuta()
'Libro del que se ejecuta la macro
HojaMinuta.Select
Range("A7").CurrentRegion.Select
Selection.Copy
'Libro donde se va a pegar la información
Workbooks.Open Filename:="C:\Users\Juan Carlos\Desktop\trabajo de Macros\MINUTA\Minuta Central Alarmas Bogotá.xlsm"
Windows("Minuta Central Alarmas Bogotá").Activate
ActiveSheet.Select
Selection.Unprotect Password:="1130657994"
Range("A7").Select
ActiveSheet.Paste
Selection.Protect Password:="1130657994"
ActiveWorkbook.Sabe
ActiveWorkbook.Close True
Application.CutCopyMode = False
End Sub
Lo que sucede es que deseo copiar un rango en otro libro, pero este se encuentra protegido, quiero desprotegerlo, que pegue la información y vuelva y lo proteja. Les Agradezco su ayuda, igualmente si me permiten mejorar el código sería muy bueno.