Excel VBA que oculte algumas colunas e imprima o restante, Excel 2007

[Bikke]

Boa noite

Venho solicitar ajuda.

Pretendo que, ao clicar num botão, o código VBA me oculte algumas colunas e imprima o restante.

A área a imprimir é de A3 a CB46, mas, pretendo que antes de imprimir me oculte as colunas de O a AF.

 

Informo também que, essa planilha estará protegida, se o código VBA necessitar de desproteger a planilha, deverá levar também um código para a Desproteger e após imprimir deverá Proteger a planilha e repor as colunas que foram ocultadas.

Obrigado desde já.

Cumprimentos

 

Novembro 2019.xls

[Bikke]

Após pesquisar na net e testar na minha planilha, encontrei o correcto e o que pretendia.

 

Aqui deixo o código VBA para quem necessitar.
 

Sub PRINT_ESCALA()
  Sheets("ESCALA").Unprotect "123"
  Columns("O:AF").Hidden = True
  Sheets("ESCALA").Select
  ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
  Sheets("ESCALA").Select
  Columns("O:AF").Hidden = False
  Sheets("ESCALA").Protect "123"
End Sub

 

Cumprimentos