About Me

A minha foto
JRod - PORTUGAL
Microsoft [MVP] - Excel (10º ano consecutivo)
Ver o meu perfil completo
Com tecnologia do Blogger.

Seguidores

Estatisticas

Free Blog Counter

eXTReMe Tracker
2008-05-25

Há dias, foi-me perguntado qual o método para se poder imprimir, de uma só vez, Ranges provenientes de duas WorkSheets.

Uma das possibilidades, é utilizar uma mistura de Excel (definição das áeras de impressão nas duas WorkSheets) e de VBA, no sentido de, a partir daquela definição, imprimir de uma só vez, mas em duas folhas distintas, os Ranges pretendidos.

Exemplo:

Sheet1:

image 

Sheet2:

image

 

Para definir as respectivas áreas de impressão:

1 - "marcar" o Range pretendido

2 - File>PrintArea>Set Print Area

 image

3 - A definição das áreas de impressão deve ser efectuada para as duas Sheets.

 

E, agora, para a impressão dos Ranges definidos, o código VBA:

 

Sub ImprimeDeUmaVez()

    Sheets(Array("Sheet1", "Sheet2")).Select
    ActiveWindow.SelectedSheets.PrintOut

End Sub

 

Tópicos relacionados:

2008-05-01

Enquanto criamos objectos (barra de Ferramentas - Desenho), se mantivermos premida a tecla "SHIFT", estaremos a efectuar o que se chama "constrangimento".

Os efeitos são os seguintes:

  • Os botões "linha" e "seta", desenham linhas perfeitamente horizontais ou verticais, ou linhas diagonais com incrementos exactos de 15º (0º, 15º, 30º, etc...)
  • o botão "rectângulo", desenha quadrados perfeitos
  • o botão "oval", desenha círculos perfeitos

Exemplo:

Objectos

 

Tópicos relacionados: