Classe DocumentWindow (PowerPoint VBA)

A classe DocumentWindow representa uma janela de documento. Objeto DocumentWindow é um membro do DocumentWindows coleção. A coleção DocumentWindows contém todas as janelas de documentos abertos.

Os principais procedimentos da classe DocumentWindow são Activate e Close

Set

Para usar uma variável de classe DocumentWindow, ela primeiro precisa ser instanciada por exemplo

Dim dww as DocumentWindow
Set dww = ActiveWindow

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo DocumentWindow: Application.ActiveWindow, NewWindow, DocumentWindows.Item, Presentation.NewWindow, Application.Windows e Presentation.Windows

Temas

Os procedimentos a seguir nesta aula foram agrupados e são descritos em uma página de tema separada

Format with its procedures Height e Width

Métodos

Estes são os principais métodos da classe DocumentWindow

Activate - Ativa o objeto especificado.

ActiveWindow.Activate

Close - Fecha a janela do documento especificado.

ActiveWindow.Close

Estes são os principais métodos da classe

ExpandSection - Expande a seção na DocumentWindowatual.

Dim lngsectionIndex As Long: lngsectionIndex = 
ActiveWindow.ExpandSection sectionIndex:=lngsectionIndex, Expand:=True

LargeScroll - Rola de página em página pela janela de documento especificada.

ActiveWindow.LargeScroll Down:=3

RangeFromPoint - Retorna o objeto Shape que está localizado no ponto especificado pelo par de coordenadas de posição de tela. Se nenhuma forma estiver localizada no par de coordenadas especificado, o método retornará Nothing.

Dim lngX As Long: lngX = 240
Dim lngY As Long: lngY =  300
Dim shpRangeFromPoint As Shape
Set shpRangeFromPoint = ActiveWindow.RangeFromPoint(X:=lngX, Y:=lngY)

ScrollIntoView - Rola a janela do documento de forma que os itens dentro de uma área retangular específica sejam exibidos na janela ou no painel do documento.

ActiveWindow.ScrollIntoView Left:=, Top:=, Width:=, Height:=

SmallScroll - Rola pela janela de documento especificada por linhas e colunas.

ActiveWindow.SmallScroll  Down:=3

Propriedades

Active Retorna se o painel ou janela especificada está ativa. Somente leitura.

Dim mtsActive As Office.MsoTriState
mtsActive = Windows(2).Active

ActivePane Retorna um objeto Pane que representa o painel ativo na janela de documento. Somente leitura.

Dim panActivePane As Pane
Set panActivePane = ActiveWindow.ActivePane

BlackAndWhite Determina se a exibição da janela de documento será em preto-e-branco. Leitura/gravação.

ActiveWindow.BlackAndWhite = msoTrue

Caption Retorna o texto que aparece na barra de título da janela de documento. Somente leitura.

Dim strCaption As String
strCaption = ActiveWindow.Caption

Left Retorna ou define um valor único que representa a distância em pontos da borda esquerda do documento, aplicativo e windows de apresentação de slides até a borda esquerda da área do cliente da janela do aplicativo. A definição dessa propriedade como um valor positivo ou negativo muito grande pode posicionar a janela completamente fora da área de trabalho. Leitura/gravação.

ActiveWindow.Left =

Panes Retorna uma coleção Panes que representa os painéis da janela de documento. Somente leitura.

Dim pnsPanes As Panes
Set pnsPanes = ActiveWindow.Panes

Parent Retorna o objeto parente para o objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.Parent

Presentation Retorna um objeto Presentation que representa a apresentação no qual a janela de documento especificado ou janela de apresentação de slides foi criada. Somente leitura.

Dim prsPresentation As Presentation
Set prsPresentation = ActiveWindow.Presentation

Selection Retorna um objeto Selection que representa a seleção na janela de documento especificada. Somente leitura.

Dim slcSelection As Selection
Set slcSelection = ActiveWindow.Selection

SplitHorizontal Retorna ou define a porcentagem da largura da janela de documento que o painel de estrutura de tópicos ocupa no modo de exibição normal. Corresponde à posição do divisor de painéis entre os painéis de slides e de estrutura de tópicos. Leitura/gravação.

ActiveWindow.SplitHorizontal =

SplitVertical Retorna ou define a porcentagem da altura da janela de documento que o painel de slides ocupa no modo de exibição normal. Corresponde à posição do divisor de painéis entre o painel de slides e o painel de anotações. Leitura/gravação.

ActiveWindow.SplitVertical =

Top Retorna ou define um valor único que representa a distância em pontos a partir da borda superior do documento, aplicativo e a janela de apresentação de slides até a borda superior da área do cliente da janela do aplicativo. Leitura/gravação.

ActiveWindow.Top = 10

View Retorna um objeto View que representa o modo de exibição na janela de documento especificada. Somente leitura.

Dim vwView As View
Set vwView = ActiveWindow.View

ViewType Retorna ou define o tipo de modo de exibição contido na janela de documento especificada. Leitura/gravação.

ActiveWindow.ViewType = ppViewHandoutMaster

WindowState Retorna ou define o estado da janela especificada. Leitura/gravação.

ActiveWindow.WindowState = ppWindowMaximized

DocumentWindows.Count Retorna o número de objetos na coleção especificada. Somente leitura.

Dim lngCount As Long
lngCount = ActivePresentation.Windows.Count

DocumentWindows.Parent Retorna o objeto parente para o objeto especificado.

Dim objParent As Object
Set objParent = ActivePresentation.Windows.Parent